/|DC?9g  ISO'S 


AFFDL-TR-73-50 
Volume  III 


ADVANCED  METALLIC  STRUCTURES: 

AIR  SUPERIORITY  FIGHTER  WING 
DESIGN  FOR  IMPROVED  COST, 
WEIGHT  AND  INTEGRITY 

VOLUME  III  STRESS,  FATIGUE  AND  FRACTURE, 
COST  AND  MATERIAL  DATA 


D.  F.  Davis,  at  al. 


GENERAL  DYNAMICS 
Convair  Aerospace  Division 
Fort  Worth  Operation 


Technical  Report  AFFDL-TR-73-50,  Volume  III 

July  1973 


Approved  for  public  release; 
distribution  unlimited. 


Air  Force  Flight  Dynamics  Laboratory 
Air  Force  Systems  Command 
Wright  Patterson  Air  Force  Base,  Ohio 


20080819  212 


NOTICE 


When  Government  drawings,  specifications,  or  other  data  are  used  for  any  purpose 
other  than  in  connection  with  a  definitely  related  Government  procurement  operation, 
the  United  States  Government  thereby  incurs  no  responsibility  nor  any  obligation 
whatsoever;  and  the  fact  that  the  government  may  have  formulated,  furnished,  or  in 
any  way  supplied  the  said  drawings,  specifications,  or  other  data,  is  not  to  be  regarded 
by  implication  or  otherwise  as  in  any  manner  licensing  the  holder  or  any  other  person 
or  corporation,  or  conveying  any  rights  or  permission  to  manufacture,  use,  or  sell  any 
patented  invention  that  may  in  any  way  be  related  thereto. 


Copies  of  this  report  should  not  be  returned  unless  return  is  required  by  security 
considerations,  contractual  obligations,  or  notioe  on  a  specific  document. 


Al  R  FORCE/567 80/26  April  1974  —  250 


So 8 S Lo  Qy 


ADVANCED  METALLIC  STRUCTURES: 

AIR  SUPERIORITY  FIGHTER  WING 
DESIGN  FOR  IMPROVED  COST, 

WEIGHT  AND  INTEGRITY 

Volume  III  Stress,  Fatigue  and  Fracture, 
Cost  and  Material  Data 


D.  F.  Davis,  et  al. 
GENERAL  DYNAMICS 
Convair  Aerospace  Division 
Fort  Worth  Operation 


Approved  for  public  release; 
distribution  unlimited. 


FOREWORD 


The  efforts  reported  herein  were  sponsored  by  the  Air  Force 
Flight  Dynamics  Laboratory  (AFFDL)  under  the  joint  management 
and  technical  direction  of  AFFDL  and  the  Air  Force  Materials 
Laboratory,  WPAFB,  Ohio,  45433.  The  work  was  performed  under 
Contract  F33615-72-C-2149 ,  Flight  Dynamics  Laboratory  Project 
Number  486U,  "Advanced  Metallic  Structures:  Air  Superiority 
Fighter  Wing  Design  for  Improved  Cost,  Weight  and  Integrity." 

Mr.  Lawrence  R.  Phillips  of  AFFDL  is  the  Air  Force  Project 
Engineer . 

These  studies  were  performed  by  the  Structural  Design  Group, 
Convair  Aerospace  Division  of  General  Dynamics,  Fort  Worth  Oper¬ 
ation  with  D.  F.  Davis  as  the  Program  Manager.  Other  principal 
participants  in  the  program  are  as  follows:  R.  W.  McAnally, 
Structural  Design;  E.  W.  Gomez,  Stress  Analysis;  J.  W.  Morrow, 
Fatigue  and  Fracture  Analysis;  J.  M.  Shults,  Materials  Engineer¬ 
ing;  T.  E.  Henderson,  Mass  Properties;  J.  D.  Jackson,  Value 
Engineering;  J.  L.  McDaniel,  Manufacturing  Engineering;  B.  G.  W. 
Yee,  Nondestructive  Inspection;  D.  Duncan,  Quality  Assurance; 

H.  E.  Bratton,  Information  Transfer;  and  R.  L.  Jones,  Engineer¬ 
ing  Test  Laboratory. 

The  work  was  performed  from  June  1972  to  June  1973  and  was 
released  for  publication  June  1973. 

This  report  has  been  reviewed  and  is  approved. 


JOHN  C.  FRISHETT,  Major,  USAF 
Program  Manager,  AMS  Program  Office 
Structures  Division 
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ABSTRACT 


This  report  describes  the  preliminary  design  and 
analysis  for  an  Advanced  Air  Superiority  Fighter  Stores 
Loaded,  Wet  Wing  Structure.  The  wing  box  of  the  F-111F 
airplane  designed  by  the  Convair  Aerospace  Division  of 
General  Dynamics  was  used  as  the  baseline  vehicle. 

A  unique  design  methodology  was  followed  to  arrive 
at  three  configurations  which  offer  an  optimum  balance 
between  structural  efficiency  and  technological  advancement. 
This  methodology  consists  of  compiling  element  concepts; 
integrating  them  into  cross-section  drawings;  optimizing 
them  in  analytical  assemblies;  and  finally  preparing  full 
wing  box  designs.  Each  step  was  followed  with  a  detailed 
evaluation  and  ranking  step  which  utilized  a  formal  merit 
rating  system.  This  system  permitted  the  evaluation  of 
numerous  concepts  and  insured  that  each  technical  discipline 
participated  in  the  design  selection. 

A  subsequent  program  is  proposed  to  evaluate  the 
capability  of  the  selected  design  to  meet  the  overall 
program  goals  of  advancing  technology  without  significantly 
affecting  costs.  The  subsequent  program  involves  additional 
preliminary  design,  a  development  test  program,  detail  design, 
manufacture,  and  tests;  including  static,  fatigue,  and  damage 
tolerance  testing.  Information  generated  during  this  effort 
will  be  disseminated  to  the  Air  Force  and  industry  in  general 
through  an  intensive  information  transfer  effort. 
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appendix  V 

STRESS  ANALYSIS 


V.l  FLIGHT  TEST  WING  LOADS 

This  section  presents  the  portion  of  results  of  the 
flight  loads  buildup  and  demonstration  tests  for  the  F-lll 
with  no  external  stores  as  applicable  to  the  F-111F  wing. 

The  entire  test  program  results  are  reported  in  Reference  1. 
These  balanced  symmetric  flight  tests  were  accomplished  on 
F-111A  No.  13  and  F-111A  No.  75.  These  tests  were  accomplished 
to  establish  the  maximum  load  levels  encountered  in  flight. 

The  ultimate  objective  of  such  testing  is  to  show  that  the 
loads  used  for  design  and  the  loads  applied  in  static  test 
are  adequate. 


V . 1 . 1  Background 

The  initial  flight  loads  program  for  the  F-lll  is  out¬ 
lined  in  Reference  2.  It  was  developed  to  meet  MIL-S-5711 
requirements  for  a  flight  loads  survey  and  demonstration. 

Flight  testing,  based  on  that  program,  began  in  July  1967 
and  continued  through  February  1968.  At  that  time,  the  test 
airplane  (F-111A  No.  13)  went  into  down-time  for  extensive 
structural  rework  to  bring  it  up  to  the  production  configu¬ 
ration.  6 

In  November  1968,  during  the  "F-111A/E/D  Structural 
Integrity  Reconsideration  Meeting"  at  the  SPO,  General  Dynamics 
was  directed  to  reduce  program  costs  by  realignii  g  the  strruc- 
integrity  flight  program.  The  new  program  was  to  be  a 
build-up  demonstration  in  lieu  of  the  Flight  Loads  Survey  and 
Demonstration.  An  analytical  survey  rather  then  a  flight  loads 
survey  would  be  relied  on  to  define  load  trends  and  to  select 
critical  maneuvers  and  wing  sweeps  for  demonstration.  A  fe^ 
noncritical  conditions  were  to  be  flown  to  verify  the  analysis 
which  led  to  the  prediction  of  critical  conditions.  The  SPO 
position  was  that  sufficiently  accurate  loads  can  be  derived 
less  expensively  on  the  ground.  The  flight  program  is  then 
aimed  at  proving  the  loads  for  the  predicted  critical  conditions 
are  no  greater  than  those  used  for  design. 

At  that  time,  General  Dynamics  was  "tooling-up"  for  a 
complete  F-111D  analytical  loads  survey.  It  was  to  be  based 
on  all  available  F-lll  wind  tunnel  data  and  would  contain  a 
complete  set  of  basic  aerodynamic  coefficients  along  with 
matching  airload  distributions.  The  inertia  data  used  would 
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also  include  matching  panel  point  distributions  so  that  final 
net  loads  would  result  in  a  “balanced  airplane"  for  each  con¬ 
dition  analyzed.  The  net  load  trends  resulting  from  such  an 
analysis  would  provide  the  analytical  baseline  desired  for 
establishing  the  new  flight  loads  program.  This  analytical 
loads  survey,  although  specifically  being  conducted  for  the 
F-111D,  would  be  directly  applicable  to  the  F-111A  for  the 
purpose  of  selecting  demonstration,  validation,  and  build-up 
conditions.  Thus  the  new  program  definition  is  based  on  F-111D 
maneuver  analysis  load  trends  supplemented  by  data  gathered 
during  the  early  flight  loads  survey. 

The  initial  phase  flight  loads  survey  results  and  the 
F-111D  analytical  predictions  show  that  balanced  symmetric 
maneuvers  develop  the  maximum  load  magnitudes  on  the  wing  and 
high  lift  devices.  The  survey  results  supplemented  by  the 
analytical  predictions  were  the  basis  for  selection  of  test 
points  for  these  components.  Demonstration  maneuvers  were 
flown  at  the  predicted  critical  conditions  to  define  peak 
load  magnitudes.  In  addition,  several  non-demonstration 
(lower  load  level  validation  type)  maneuvers  were  performed  at 
different  points  to  confirm  that  the  maneuvers  selected  for 
demonstration  are  at  the  critical  conditions.  Table  I  shows 
a  summary  of  the  balanced  symmetric  maneuver  critical  con¬ 
ditions. 


V.1.2  Flight  Loads 

A  discussion  of  flight  loads  is  presented  in  the  following 
paragraphs . 

V. 1.2.1  Loads  Measurement  Methods 

Flight  loads  data  on  the  F-lll  aircraft  are  acquired  by 
means  of  calibrated  strain  gauge  bridges  installed  on  the 
wing,  fuselage,  and  vertical  and  horizontal  tails.  Shear, 
bending,  moment,  and  torsion  are  measured  at  four  spanwise 
stations  on  the  right-hand  wing  outer  panel  and  at  the  right- 
hand  and  left-hand  pivot  center  line  by  means  of  instrumenta¬ 
tion  installed  on  the  pivot  support  structure  as  illustrated 
in  Figure  1.  All  strain  gauge  bridges  are  located  in  such  a 
manner  to  provide  the  required  measurement  accuracy  with 
minimum  effect  due  to  concentrated  load  effects,  stress  con¬ 
centrations,  or  thermal  strains.  Prior  to  instrumenting  the 
flight  test  wing,  a  development  test  was  conducted  in  which 
a  stub  wing  specimen  was  instrumented  and  loaded  at  both  room 
temperature  and  transient  heating  conditions  to  verify  the 
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Figure  1  F-lll  Wing  Loads  Measurements 
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absence  of  temperature  effects.  Analytical  studies  were 
also  made  to  establish  that  fuel  pressurization  effects  would 
not  degrade  the  wing  load  measurements.  Strain  gauges  are 
also  installed  on  all  support  fittings  of  high-lift  and 
spoiler  systems  to  measure  the  concentrated  load  introduced 
at  these  points.  A  complete  description  of  the  strain  gauge 
instrumentation  on  the  F-111A  flight  loads  aircraft  is  con¬ 
tained  in  Reference  3. 

The  strain  gauge  bridges  were  calibrated,  loads  equations 
derived,  and  individual  bridges  electrically  combined  to  yield 
direct  measurement  of  shear,  moment,  and  torsion  based  upon 
the  methods  of  Reference  4.  It  was  found  advantageous  to 
calibrate  the  outer  wing  panel  and  the  pivot  support  struc¬ 
ture  individually  in  separate  test  fixtures.  This  method 
was  found  to  be  practical  because,  with  the  determinate 
nature  of  the  load  reaction  at  the  pivot,  precise  simulation 
of  the  support  stiffness  was  not  required  to  produce  valid 
results  and  considerable  flexibility  in  scheduling  was  ob¬ 
tained.  The  validity  of  the  separated  component  calibration 
has  been  demonstrated  in  two  ways: 

1.  The  outer  panel  measured  shears  were  integrated 
and  compared  with  the  measured  bending  moment 
distribution.  These,  together  with  outer  panel 
torsion,  were  extrapolated  to  the  pivot  and 
compared  with  the  measured  pivot  shear,  moment 
and  torsion.  Agreement  has  been  excellent  for 
all  wing  sweeps. 

2.  Wing  outer  panel  and  pivot  loads  instrumentation 
was  recorded  during  the  recent  structural  proof 
tests  of  the  aircraft  and  compared  with  the 
applied  loads.  Again,  excellent  agreement  was 
obtained. 

A  complete  description  of  the  F-111A  loads  calibration  methods 
and  results  is  contained  in  References  5  and  6. 

V.l.2.2  Data  Processing  and  Analysis 

Flight  loads  data  for  the  F-lll  were  recorded  on  air¬ 
borne  magnetic  tape  utilizing  FM/FM  multiplexing  techniques 
with  standard  IRIG  subcarrier  bands.  In  addition  to  the 
structural  loads  measuranents,  standard  correlation  items 
such  as  accelerations,  positions,  aircraft  attitude,  air¬ 
speed,  and  altitude  were  also  recorded.  Critical  items  of 
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information  were  telemetered  to  the  ground  control  station 
for  real-time  monitoring  and  test  evaluation  by  test  engineers. 

After  flight,  the  data  is  converted  to  digital  format 
and  operated  upon  through  General  Dynamics  prepared  digital 
computer  programs  to  apply  calibration  factors,  inertia 
distributions,  etc.  The  data  is  then  presented  directly  in 
engineering  units  in  both  tabular  form  and  as  cross  plots  of 
load  vs  parameter  using  the  Stromberg -Carl son  4020  Computer 
Recorder. 

Included  in  the  digital  computer  plotted  output  are  plots 
of  wing  load  normalized  with  altitude  (load  per  unit  dynamic 
pressure  q)  versus  nzW/q  (normal  load  factor  times  gross 
weight  per  unit  q) .  These  plots  are  segregated  according  to 
wing  sweep,  configuration,  maneuver  type,  Mach  number  and  load 
parameter  and  contain  load  per  q  versus  nzW/q  superimposed  for 
all  altitudes  flown.  The  results  are  a  definition  of  maximum 
load  attained  for  each  maneuver  and  a  definition  of  aero- 
elastic  effects  on  wing  loads.  Typical  computer  plots  are 
shown  in  Figure  2  and  Figure  3. 

V.l.2.3  Maneuver  Definitions 

Several  different  types  of  maneuvers  are  accomplished 
during  flight  testing.  A  description  of  the  two  basic 
maneuvers  used  to  accomplish  wing  loading  is  shown  belowi 

Balanced  symmetric  maneuvers  - 

Normal  symmetric  pull  up  (NSPU)  -  A  smooth  pull  up 
to  a  specified  test  load  factor  performed  at  a 
designated  test  speed  and  altitude.  This  maneuver 
is  not  intended  to  be  abrupt  except  that  it  is  per¬ 
formed  with  sufficient  rapidity  to  minimize  speed 
and  altitude  changes. 

Normal  symmetric  push  over  (NSPO)  -  This  is  similar 
to  the  NSPU  described  above  except  that  this  NSPO 
maneuver  is  performed  in  the  negative  G  direction 
by  pushing  over. 

V.l.2.4  Flight  Test  Results 

Flight  measured  loads  confirm  the  analytical  predictions 
of  critical  flight  conditions.  Maxim  an  values  developed  from 
flight  test  results  are  all  at  or  with  design  limits.  Balanced 
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Wing  B.M./q,  (in. -lb. /psf )  ,  Wing  B.M./q,  (in. -lb. /psf ) 


-400  -200  0  200  400  600  800  1000 

nzW/q,  (lb. /psf) 

Figure  2  F-lll  Wing  B.M./q  vs.  nW/q  — LH  and  RH 
Pivots  and  Wing  Station  I 


nzw/q>  (lb. /psf) 

Figure  3  F-lll  Wing  B.M./q  vs.  nW/q — Wing  Stations  II,  III  and  IV 
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airplane  loads  have  been  determined  for  the  critical  16°,  26°, 
35° ,  45°,  50°,  60°,  and  72°  wing  sweep  conditions.  The  con¬ 
dition  descriptions  were  summarized  in  Table  I. 

V. 1.2. 4.1  Wing.  Flight  data  indicates  wing  loads 
smoothly  decrease  as  the  wings  are  swept  aft  at  a  given  con¬ 
dition.  Forward  wing  sweeps  would  develop  higher  maximum 
loads  if  they  were  not  restricted  to  subsonic  or  transonic 
speeds  at  low  altitudes.  The  decrease  in  wing  loads  with 
wing  sweep  is  at  least  partially  due  to  the  fact  that  part  of 
the  wing  slides  into  the  fuselage  as  it  is  swept  aft.  Thus 
less  of  the  wing  is  exposed  to  develop  lift.  The  highest 
positive  g  loads  over  most  of  the  moveable  wing  are  developed 
at  45°  wing  sweep  during  a  1.05  Mach  pullup  to  533,000  nzW. 
Condition  F400A  Table  I.  The  highest  negative  g  loads  over 
most  of  the  wing  are  developed  at  45°  during  a  1.05  Mach  push¬ 
over  to  -218,300  nzW.  Shear  on  the  most  inboard  region  is 
higher  at  26°  wing  sweep  and  maximum  torsion  over  the  entire 
wing  occurs  when  flaps  are  extended.  Wing  load  distribution 
envelopes  are  shown  in  Figures  4  through  6. 

Maximum  torsion  over  the  entire  wing  for  negative  g 
maneuvers  is  developed  at  72°  wing  sweep.  The  same  maneuver 
produces  the  highest  shear  and  bending  moment  on  the  outboard 
section  of  the  wing.  The  45°  wing  sweep  pushover  is  more 
critical  for  shear  and  bending  over  most  of  the  rest  of  the 
wing  although  shear  near  the  pivot  is  slightly  higher  at  35° 
wing  sweep.  Interaction  diagrams  at  each  instrumentation 
station  for  all  test  wing  sweeps  are  provided  in  Figure  7 
through  10. 

V. 1.2. 4. 2  High  Lift  Devices.  Flap  loads  are  primarily 
a  function  of  flap  deflection  and  dynamic  pressure.  Maximum 
values  occur  during  a  16°  wing  sweep  pullup  to  320,000  nzW 
at  330  KCAS  with  30°  flaps.  The  most  critical  flap  track  load 
is  90%  of  limit.  Loads  on  each  flap  track  at  the  rear  spar, 
are  summarized  in  Table  II.  A  spanwise  load  distribution  is 
provided  in  paragraph  V.1.3. 

Maximum  positive  g  slat  loads  are  also  developed  during 
a  16°  wing  sweep  pullup  to  320,000  nzW  with  30°  flaps,  but 
the  critical  speed  is  277  KCAS.  Slat  loads  are  primarily  a 
function  of  slat  angle  of  attack  and  dynamic  pressure.  Peak 
loads  occur  when  limit  load  factor  and  slat  stall  are  reached 
simultaneously  at  the  highest  possible  dynamic  pressure.  The 
load  on  the  most  critical  slat,  slat  No.  3,  is  less  than  86%, 
of  limit.  Maximum  values  on  each  slat  track  are  summarized  in 
Table  III. 
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NET  SHEAR  x  10  ~  LBS 


Figure  4  F-lll  Net  Wing  Vertical  Shear  Envelop 
(Based  on  Flight  Test  Data) 
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Figure  5  F-lll  .26  Wing  Chord  Net  Bending  Moment  Envelop 
(Based  on  Flight  Test  Data) 


10 


NET  TORSION  <  10"  ~~IN-LB$ 


Figure  6  F-lll  .26  Wing  Chord  Net  Torsion  Envelop 
(Based  on  Flight  Test  Data) 
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F-lll  Wing  Box  Shear  vs.  Torsion  -  Station  I 
mary  of  Balanced  Symmetric  Maneuver  Final  Loads 
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Table  II 


MAXIMUM  FLAP  TRACK  LOADS  AT  THE  REAR  SPAR 
CONDITION  F101A 


TRACK 

NUMBER 

VERTICAL 

SHEAR 

(LBS) 

BENDING 
MOMENT 
(IN- LBS) 

LIMIT  ALLOWABLE 
BENDING  MOMENT 
(IN- LBS) 

BENDING  MOMENT 
%  LIMIT 

1 

5,250 

216,400 

286,000 

75.7 

2 

9,720 

347,000 

385,000 

90.1 

3 

6,860 

205,200 

284,000 

72.2 

4 

4,240 

106,000 

146,000 

72.6 

5 

1,140 

22,900 

59,000 

38.8 

NOTE:  Shear  is  at  rear  spar  and  normal  to  the  wing  plane. 

Bending  moment  is  about  the  rear  spar. 
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Table  III 


MAXIMUM  SLAT  TRACK  BENDING  MOMENTS1 


A  -  16°, 

8F  -  30°, 

A/S  -  277  KCAS,  h  - 

Sea  Level, 

nzW  -  320,000  Lbs., 

a-  18.0°  ,  8e 

-  18.5° 

TRACK 

BENDING2 
MOMENT 
(IN- LBS) 

LIMIT  ALLOWABLE 
BENDING  MOMENT 
(IN- LBS) 

7.  LIMIT 

ALLOWABLE 

1  -  Inb'd 

22,360 

62,200 

35.9 

1  -  Outb'd 

33,410 

49,500 

67.5 

2  -  Inb'd 

30,160 

39,000 

77.3 

2  -  Outb'd 

20,930 

33,200 

63.0 

3  -  Inb'd 

18,460 

21,900 

84.3 

3  -  Outb'd 

18,200 

21,200 

85.8 

4  -  Inb ' d 

13,780 

17,300 

79.6 

4  -  Outb'd 

7,960 

11,900 

66.9 

NOTES:  (1) 

These  loads  do  not  occur  at  condition  F101A. 

Slat  loads  at  condition  F101A  are  lower. 

(2)  The  slat  track  moments  and  allowables  are 
referenced  to  the  instrumentation  locations 
defined  on  page  109  of  MRTP- 12-529,  F-lllA  No.  13 
and  No.  75  Structural  Flight  Test  Programs 
Instrumentation,  dated  27  May  1969. 
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Maximum  air  director  door  loads  are  developed  between  30% 
and  407.  flap  extension.  A  secondary  peak  occurs  at  about  607.  ex¬ 
tension.  These  positions  correspond  to  maximum  negative  door 
deflection  and  the  point  at  which  the  door  passes  through  zero 
deflection.  Maximum  load  values  are  summarized  in  Table  IV.  None 
of  them  approach  design  limit. 

V.1.3  Final  Balanced  Airplane  Loads 

Final  clean  airplane  balanced  symmetric  maneuber  loads  for 
limit  positive  and  negative  g  conditions  are  provided  in  this 
section.  Of  the  eleven  conditions  shown  in  Table  I,  the  four  con¬ 
ditions  for  which  various  maximum  wing  loading  occurs  are  singled 
out  for  presentation  in  this  paragraph. 

These  loads  are  largely  based  on  the  demonstration  maneuvers 
and  the  supporting  buildups.  Refinements  were  made  to  account  for 
the  difference  between  actual  flight  conditions  and  the  criteria 
requirements.  In  many  cases  the  minimum  test  altitude  (5000  feet) 
was  above  the  critical  altitude.  Normal  variation  in  test  Mach, 
altitude,  q,  airplane  unbalance,  etc.,  were  accounted  for  in  the 
final  loads  calculation.  Also,  an  effort  has  been  made  to  account 
for  fuselage-wing  interference  effects  in  the  enclosed  loads.  The 
airplane  calibration  carried  out  to  about  607.  of  limit  load,  does 
not  permit  direct  definition  of  external  load  where  large  interfer¬ 
ence  loads  were  encountered.  The  loads  have  been  modified  such  that 
they  define  external  applied  loads  and  do  not  include  internal  inter¬ 
ference  effects.  Overwing  fairing  contribution  to  wing  load  has  been 
included  however,  as  the  data  available  does  not  permit  such  separa¬ 
tion.  The  effect  is  felt  to  be  small. 

Wing  loads  for  torsion  at  maximum  positive  g,  Condition  F101A 
of  Table  I  are  presented  in  Table  VI,  Table  VII  and  in  Figures  11 
through  15.  Condition  F101A  flight  parameters  are  summarized  in 
Table  V. 

Loads  for  maximum  positive  g  conditions,  Condition  F400A  of 
Table  I  are  shown  in  Table  IX,  Table  X  and  in  Figures  16  through 
20.  Flight  parameters  are  summarized  in  Table  VIII.  The  loads  for 
maximum  negative  g  conditions,  Condition  F401A  of  Table  I,  are 
shown  in  Table  XII,  Table  XIII  and  in  Figures  21  through  25.  Para¬ 
meters  of  the  Condition  F401A  are  summaried  in  Table  XI. 

Wing  loads  for  Conditions  of  Torsion  at  maximum  negative  g, 
Condition  702A  of  Table  I,  are  presented  in  Table  XV,  Table  XVI 
and  in  Figures  26  through  30.  These  flight  parameters  are  sum¬ 
marized  in  Table  XIV. 

Maximum  Flap  and  Slat  loads  are  shown  in  Table  XVII,  Table 
XVIII,  Figure  13,  and  Figure  32. 

Design  conditions  for  wing  pylons  are  shown  in  Ta >le  XIX  and 
Figure  33. 
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Table  IV 


F-lll 

AIR  DIRECTOR  DOOR 
SUMMARY  OF  MAXIMUM  LINK  LOADS 
LANDING  APPROACH  CONFIGURATION 


MAXIMUM  POSITIVE  LOADS 


LINK 

LINK  LOAD 
(LBS) 

LIMIT  ALLOWABLE 
LINK  LOAD 
(LBS) 

%  LIMIT 
ALLOWABLE 

1 

408 

1,000 

40.8 

2 

546 

864 

63.2 

3 

292 

766 

38.1 

4 

275 

610 

45.1 

MAXIMUM 

NEGATIVE  LOADS 

LINK 

LINK  LOAD 

LIMIT  ALLOWABLE 
LINK  LOAD 
(LBS) 

7,  LIMIT 
ALLOWABLE 

1 

-  86 

-  5,200 

1.6 

2 

-  961 

-  3,820 

25.2 

3 

-  1,521 

-  3,220 

47.2 

4 

-  194 

-  2,880 

6.7 
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Table  V 


FLIGHT  CONDITION  SUMMARY 


CONDITION 


F101A 


AIRPLANE  _  F-lll 

MANEUVER  _  NSPU 


MACH  NUMBER _ 

ALTITUDE,  FT. _ 

GROSS  WEIGHT,  LBS. 
WING  SWEEP,  DEG.  _ 
C.G. ,  %  MAC _ 


330  KCAS 

S.L. 

77,584.7 

16 

28 

+4.124 


ANGLE  OF  ATTACK,  DEG. _ +9.5 

ELEVATOR  DEFELCTION,  DEG. _ -11.8 

PITCH  RATE,  RAD/SEC. _  0.611 

PITCH  ACCELERATION,  RAD. /SEC2 _  0 

ADIABATIC  WALL  TEMPERATURE,  °F _  84 

FLAP  DEFLECTION :  DEG. _  30 


FUEL  LOADING 

FI _ 

F2 _ 

R  _ 

WING _ 

A1 _ 

A2 


WEIGHT,  LBS. 
_  7213.9 
_  8025.0 
_  2696.0 
_  0 

_  6853.0 
2434.3 


WEAPON  LOADING 
BAY 


WEIGHT,  LBS. 
2310 


WING 


0 


20 


Table  VI 


WING  PIVOT  NET  LOADS  SUMMARY 
FINAL  DESIGN  LIMIT  LOADS  FOR  CONDITION  F101A 


ITEM 

LOAD 

POSITIVE  SIGN 
CONVENTION 

Mxx 

16.742  x  106  IN- LBS 

TIP  UP 

Myy 

-  6.259  x  106  IN- LBS 

L.E.  Up 

Vp  (Shear) 

113.778  x  103  LBS 

Up 

Bending 

Moment 

(Along 

26% 

Chord) 

17.660  x  106  IN- LBS 

TIP  UP 

Torsion 

(Above 

26% 

Chord) 

-2.606  x  106  IN- LBS 

L.E.  Up 

m22 

.578  x  106  IN- LBS 

TIP  FORWARD 
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FINAL  DESIGN  LIMIT  LOADS  FOR  CONDITION  FlOlA 


SWEEPING 

MOMENT 

X  106 

IN- LBS 

ooomronirioaNHvo^NNNiriNcovON 

r^cMvOrHvOiHr^cNONmcMOr^tncocNjiHoo 

lOiTKf<t(ncOMNHHHOOOOOOOOOO 

CHORD  FORCE 
X103 

LBS 

cnr^mvoomocjNr^r^ONvoo^,cncNj<ff^o>ON 

Mrs(NvooMcnr)NON<fHrs^(MHfsivo<f 

Mn<j-NHC3>MncOHoOvO<fHC^MncnHOO 

nnnfOtnCMNCNNCSHHHH 

TORSION 

X103 

IN- LBS 

vommomooooooooooooomo 

o^r^H^ooH^^nNcvirsNC^ONooHincvi 

v£)<fCNHONN\£UJ*NH^OOvOiricncvjHHOO 

CSCSCSCNf- tr— lr— lr-li— l<— (OOOOOOOOOO 

1  1  1  1  1  1  1  1  t  1  •  1  1  1  1  |  1  1  |  | 

MOMENT 

X  106 

IN- LBS 

vOOrHOr^CN|v£>aNCvJinO>mrHC^OOOOOOOOv£)iH 

vOONCMvOOvOCM^OOf^r^ONCNJinOvOCOrHOO 

Mn^NHONoovotn^cnwcNHHooooo 

r— 1  rH  rH  rH  r-H 

SHEAR 

X  103 

LBS 

113.778 

109.289 

104.643 

99.799 

94.720 

89.365 

83.664 

77.568 

71.111 

64.378 

57.408 

50.281 

43.076 

35.870 

28.822 

22.050 

15.710 

10.001 

5.158 

1.496 

0 

DISTANCE  OUTB'D 
OF  PIVOT  ALONG 

26 7.  CHORD 

0 

15.75 

31.50 

47.25 

63.00 

78.75 

94.50 

110.25 

126.00 

141.75 

157.50 

173.25 

189.00 

204.75 

220.50 

236.25 

252.00 

267.75 

283.50 

299.25 

315.00 
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Figure  12  Final  Flight  Loads,  Wing  Spanwise  Distribution  of  Net  Bending  Moment 

Condition  F101A  n  W  -  320,000 
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Figure  13 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Torsion 
Condition  F101A  n  W  =  320,000 
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Fractional  Distance  Outboard  of  Pivot  Along  .26C 

Figure  15 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Sweeping  Moment 
Condition  F101A  nzW  =  320,000 


Table  VIII 


FLIGHT  CONDITION  SUMMARY 


CONDITION  _ 

AIRPLANE  _ 

MANEUVER  _ 

MACH  NUMBER _ 

ALTITUDE,  FT.  _ 

GROSS  WEIGHT,  LBS. 
WING  SWEEP,  DEG.  _ 
C.  G.,  %  MAC  _ 


ANGLE  OF  ATTACK,  DEG. _ 

ELEVATOR  DEFLECTION,  DEG. _ 

PITCH  RATE,  RAD/SEC.  _ 

PITCH  ACCELERATION,  RAD./SEC2_ 
ADIABATIC  WALL  TEMPERATURE,  °F 


F400A 

Fill 

NSPU 

I. 05 
2,000 
72,750 

45 

32.35 

7.33 

II. 3 

-  17.6 
0.28 
0 

155 


FUEL  LOADING 


WEIGHT,  LBS 


FI _ 

F2 _ 

R  _ 

WING 
A1  _ 
A2 


4664.8 

8025.0 

2696.0 
_  0 

6853.0 

148.7 


WEAPON  LOADING 


WEIGHT,  LBS. 


BAY  _  2310 

WING  0 


28 


Table  IX 

WING  PIVOT  NET  LOADS  SUMMARY 
FINAL  DESIGN  LIMIT  LOADS  FOR  CONDITION  F400A 


ITEM 

LOAD 

POSITIVE  SIGN 
CONVENTION 

Mxx 

14.127  x  106  IN- LBS 

TIP  UP 

Myy 

-13.473  x  106  IN-LBS 

L.E.  Up 

Vp  (Shear) 

127.60  x  10^  Lbs 

Up 

Bending 

Moment 

(Along 

26% 

Chord) 

19.517  x  106  IN-LBS 

TIP  UP 

i 

Torsion 

(Above 

26% 

Chord) 

-.836  x  106  IN-LBS 

L.E.  Up 

mZ2 

.1730  x  106  IN- LBS 

TIP  FORWARD 

29 


FINAL  DESIGN  LIMIT  LOADS  FOR  CONDITION  F400A 
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Figure  18 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Torsion 
Condition  F400A  n  W  =  533,000 

*7 
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Figure  19 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Chord  Force 
Condition  F400A  n  W  *  533,000 
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Figure  20 
Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Sweeping  Moment 
Condition  F400A  n2W  -  533,000 


Table  XI 


FLIGHT  CONDITION  SUMMARY 

CONDITION _ F401A 

AIRPLANE  _ pill 

MANEUVER  _ NSP0 

MACH  NUMBER  _ 1>05 

ALTITUDE,  FT. _ 8,000 

GROSS  WEIGHT,  LBS.  _ 72,750 

WING  SWEEP,  DEG.  _ _  45 

C.G. ,  /o  MAC  32.0 

nz _ _ _ _  -  3.00 

ANGLE  OF  ATTACK,  DEG. _ .  5.10 

ELEVATOR  DEFLECTION,  DEG. _ _  15. 00 

PITCH  RAGE,  RAD/SEC.  _ _  -  0.157 

PITCH  ACCELERATION,  RAD./SEC2 _ 0 

ADIABATIC  WALL  TEMPERATURE  >  °F _  126 

FUEL  LOADING  WEIGHT,  LBS. 

F1 _ 4664.8 

F2  _ _ _ _ _  8025.0 

R  _ _ _ _  2696.0 

WING  _ 0 

A1  _ 6853.0 

A2  _ _ _ 148.7 

WEAPON  LOADING  WEIGHT,  LBS. 

SAY  _ 2310.0 

WING  _  0 
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Table  XII 


WING  PIVOT  NET  LOADS  SUMMARY 
FINAL  DESIGN  LIMIT  LOADS  FOR  CONDITION  F401A 


ITEM 

LOAD 

POSITIVE  SIGN 

CONVENTION 

Mxx 

-7.377  X  106  In-Lbs 

Tip  Up 

Myy 

+6.614  X  106  In- Lbs 

L.E.  Up 

Vp  (Shear) 

-62.890  X  103  Lbs 

Up 

Bending 

Moment 

-9.914  X  106  In- Lbs 

Tip  Up 

(Along 

26% 

Chord) 

Torsion 

(About 

26% 

Chord) 

+  0.119  X  106  In-Lbs 

L.E.  Up 

Mzz 

-1.282  X  106  In-Lbs 

Tip  Forward 
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FINAL  DESIGN  LIMIT  LOADS  FOR  CONDITION  F401A 
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Fractional  Distance  Outboard  of  Pivot  Along  ,26c 

Figure  21 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Shear 
Condition  F401A  n  W  =  218,000 
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Figure  23 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Torsion 
Condition  F401A  n  W  =  -218,000 
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Table  XIV 


FLIGHT  CONDITION  SUMMARY 

CONDITION  _ _  F-702A 

AIRPLANE _ F-lll 

MANEUVER  _ NSPO 

MACH  NUMBER _ _ _ 1.40 

ALTITUDE,  FT. _  17,500 

GROSS  WEIGHT,  LBS. _  72,750 

WING  SWEEP,  DEG. _  72.5 

C.G.,  7.  MAC  _  34.0 

nz  _ -3.00 

ANGLE  OF  ATTACK,  DEG. _  -6.4 

ELEVATOR  DEFLECTION,  DEG. _  14.4 

PITCH  RATE,  RAD/SEC.  _  -0.105 

PITCH  ACCELERATION,  RAD/SEC2 _ _  0 

ADIABATIC  WALL  TEMPERATURE,  °F _ 159 

FUEL  LOADING  WEIGHT,  LBS. 

Fl  _ 4664.8 

F2  _ 8025.0 

R  _ 2696.0 

WING _ 0.0 

A1 _ 6853.0 

A2  _ _  148.7 

WEAPON  LOADING  WEIGHT,  LBS. 

BAY  _ 2310.0 

WING  _  0.0 


44 


Table  XV 


WING  PIVOT  NET  LOADS  SUMMARY 
FINAL  DESIGN  LIMIT  LOADS  FOR  CONDITION  F702 


ITEM 

LOAD 

POSITIVE  SIGN 
CONVENTION 

Mxx 

-2.903  X  106  In  -  Lbs 

Tip  Up 

M 

yy 

7.784  X  106  In  -  Lbs 

L.E.  Up 

Vp (Shear) 

-46.690  X  103  Lbs 

Up 

Bending 
Moment 
(Along  26% 
Chord) 

-8.301  X  106  In-Lbs 

Tip  Up 

Torsion 

(About 

26%  Chord) 

0.123  X  106  In- Lbs 

L.E.  Up 

Mzz 

0.5308  X  106  In- Lbs 

Tip  Forward 
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Fractional  Distance  Outboard  of  Pivot  Along  .26C 

Figure  26 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Shear 
Condition  F702A  n  W  =  -218,000 
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Figure  27 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Bending 
Condition  F702A  nzW  =  -218,000 
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Fractional  Distance  Outboard  of  Pivot  Along  .26C 

Figure  28 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Torsion 
Condition  F702A  n  W  =  -218.000 
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Figure  29 

Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Net  Chord  Force 
Condition  F702A  nzW  =  -218,000 
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Fractional  Distance  Outboard  of  Pivot  Along  .26C 

Figure  30 
Final  Flight  Loads 

Wing  Spanwise  Distribution  of  Sweeping  Moment 
Condition  F702A  n  W  -  -218,000 


Table  XVII 


MAXIMUM  FLAP  TRACK  LOADS  AT  THE  REAR  SPAR 
CONDITION  F101A 


TRACK 

NUMBER 

VERTICAL 

SHEAR 

(LBS) 

BENDING 

MOMENT 

(IN-LBS) 

LIMIT  ALLOWABLE 
BENDING  MOMENT 
(IN-LBS) 

BENDING  MOMENT 
%  LIMIT 

1 

5,250 

216,400 

286,000 

75.7 

2 

9,720 

347,000 

385,000 

90.1 

3 

6,860 

205,200 

284,000 

72.2 

4 

4,240 

106,000 

146,000 

72.6 

5 

1,140 

22,900 

59,000 

38.8 

NOTE:  Shear  is  at  rear  spar  and  normal  to  the  wing  plane. 
Bending  moment  is  about  the  rear  spar. 
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NOTE:  FLAP  AND  VANE  LOADS  ARE  ASSUMED 
NORMAL  TO  THE  WING  PLANE. 
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Figure  31 

Flap  Plus  Vane  Spanwise  Running  Load  Distribution 
Condition  F101A 
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Condition  F101A 


Table  XVIII 


MAXIMUM  SLAT  TRACK  BENDING  MOMENTS1 

A-  16°,  SF  =  30°,  A/S  =  277  KCAS ,  h  »  Sea  Level, 
nzW  »  320,000  Lbs.,  O' =  18.0°,  &e  -  -18.3° 


TRACK 

BENDING2 

MOMENT 

(IN-LBS) 

# 

LIMIT  ALLOWABLE 
BENDING  MOMENT 
(IN -LBS) 

7.  LIMIT 
ALLOWABLE 

1-Inb'd 

22,360 

62,200 

35.9 

l-Outb'd 

33,410 

49,500 

67.5 

2-Inb'd 

30,160 

39,000 

77.3 

2-0utb'd 

20,930 

33,200 

63.0 

3-Inb'd 

18,460 

21,900 

84.3 

3-0utb ' d 

18,200 

21,200 

85.8 

4-Inb ' d 

13,780 

17,300 

79.6 

4-0utb ' d 

7,960 

11,900 

66.9 

NOTES:  (I)  These  loads  do  noc  occur  at  condition  F101A. 

Slat  loads  at  condition  F101A  are  lewer. 

(2)  The  slat  track  moments  and  allowables  are 

referenced  to  the  instrumentation  locations 
defined  on  page  109  or  MKVi'-i 2-329,  F-lllA  No.  13 
and  No.  75  Structural  Flight  Test  Programs 
Instrumentation,  dated  27  May  1969. 
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FIXED  PYLON  DESIGN  CONDITIONS  (ULTIMATE) 
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Reference  point  for  loads  is  on  lower  surface  on  a  vertical 
line  midway  between  forward  attachment  bolts. 


Fz  -  -  44,258  4*  36,300  lbs,  Positive  Acting  Up 

Fy  *  -  11,400  +  66,570  lbs,  Positive  Acting  Outboard 

Fx  *  -  18,150  +  2,730  lbs,  Positive  Acting  Forward 

Mz  =  -  20,866  4*  840,000  in-lbs,  Positive  Acting  Nose  Outboard 

Note:  All  forces  act  on  wing  lower  surface  at  pylon  center  line 
(  Axis  of  post  for  pivot  pylons  ) 


Figure  33  Pivot  Pylon(s)  Design  Conditions  (Ultimate) 

(Loadings  shown  must  be  satisfied 
individually  and  collectively) 
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Figure  34 

Fuel  Tank  Pressure  Distributions 


Figure  35 


Math  Model 
Internal 


of  Right  Hand  Wing  for 
Loads  Determination 
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5  I  C  XX 


JFFC5  sj^tace 


-  0*  C  CONDITION  ? 


Figure  36  Loads  Model  at  CSS  140 
Upper  Surface,  Load  Condition  2 
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Figure  37  Loads  Model  at  CSS  140 

Lower  Surface,  Load  Condition  2 
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Figure  38  Loads  Model  at  CSS  140 

Lower  Surface ,  Load  Condition  2 
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Figure  39  Lower  Surface,  Load  Condition  3 
Loads  Model  at  CSS  140 
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POSITIVE  APPLIED  LOADS  SHOWN 


Table  XX  F-111F  WING  CRITICAL  DATA  (I.BS.ULT.) 

BASELINE  CROSS-SECTION 


CSS 

COND 

pi 

P2 

P3 

P4 

P5 

P6 

P7 

P8 

P9  \42 

CSS140 

CSS340 

V 

+0 

[ 

F101A 

-1886 

-3754 

-1660 

-5091 

-1999 

-6786 

-2165 

-6082 

-3776 

1 

9 

1.39 

8.33 

1.11 

7 . 94 
.65 
7.56 
1.00 
3.46 
1.00 

1.32 
3.28 

.81 

8.31 

1.33 
8.07 

.85 

8.10 

1  .71 

.54 

.87 

.34 

.98 

.33 

1  13 
.34 
1.00 
.63 
.45 
.68 
.30 
.  78 
.23 
.73 
.24 

.  76 
.69 

F400A 

-2362 

-4452 

-1944 

-5874 

-2235 

-7352 

-2347 

-6580 

-4107 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

F401A 

878 

1571 

602 

1566 

579 

1583 

525 

1396 

1001 

340 

F702A 

1228 

2357 

984 

2937 

1108 

3619 

1168 

3200 

2115 

140 

l 

1 

140 

F101A 

-46379 

-314874 

-46809 

-350154 

-29975 

-335664 

-41989 

-130096 

-30676 

F400A 

-52427 

-354025 

-52109 

-386678 

-32987 

-366660 

•45421 

-139438 

•  32962 

F401A 

25212 

174097 

25668 

192148 

16426 

182952 

22715 

70584 

1  7478 

F702A 

24065 

160769 

23517 

173886 

14731 

163296 

20139 

61934 

14765 

P18 

P17 

P16 

P15 

P14 

P 

13 

P12 

pi  i 

P10 

F101A 

3350 

4099 

1432 
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1562 
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2808 

1 

t 
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4352 

5085 

1716 

5256 

1759 

5665 

2175 

4720 

2977 

F401A 

-2059 

-2125 

-628 

-1606 

-480 

►1086 

-387 

-684 

-489 

340 

F102A 

-2163 

-2581 

-851 

-2628 

-868 

-2716 

-1072 

-2326 

-1544 

14 

l 

0 

\ 

F101A 

63318 

324000 

36675 

347010 

57148 

339879 

31226 

113160 

37541 

F400A 

70193 

360450 

40638 

382518 

62785 

371457 

340  58 

122672 

41305 

F401A 

-36976 

-187920 

-20809 

-192873 

-30992 

-181158 

-16251 

-57400 

-19306 

140 

F702A 

-30653 

-158760 

-18016 

-170277 

-28039 

-167031 

-15460 

-56744 

- 1 9b90 

(SHEAR  FLOW,  LB/ INCH,  ULTIMATE) 
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+204 

+145 

+17 
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-75 

+491 
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+321 

+288 
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+7 
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-101 
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-26 
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+34 

+89 

+120 

+  118 

-325 

-179 

-145 

-105 

F702A 

-188 

-182 

-102 

+19 

-125 

+40 

+93 

+138 

+  137 

-382 

-235 

-198 

-155 
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UPPER  SURFACE  SPAR  CAP  AND  PANEL  LOADS 
BASELINE  FINITE  ELEMENT  LOADS 
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LOWER  SURFACE  LOAD  DISTRIBUTION 
BASELINE  FINITE  ELEMENT 
LOADS 
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V.2  SCREENING  PROCEDURES 


Of  the  many  structural  concepts  generated  during  the  early 
phases  of  the  program,  one  hundred  and  thirty-three  (133)  were 
proposed  for  further  development  and  evaluation  as  complete  wing 
cross-sections  and,  subsequently,  as  analytical  assemblies.  Each 
concept  was  assigned  a  number  for  identification  and  submitted  as 
a  preliminary  drawing.  To  compare  the  weight-saving  potential  of 
the  competing  concepts,  a  computerized  screening  procedure  was 
developed  for  estimating  surface  panel  weights.  The  screening 
procedure  incorporates  an  iterative  weight  minimization  scheme 
which  utilizes  Ramberg-Osgood  simulations  of  the  material  stress- 
strain  curves.  Well  over  one  hundred  (100)  candidate  surface 
panel  concepts  have  been  compared  in  this  manner.  Panel  concept 
weights  are  affected  by  the  following  considerations: 


o  Material  properties 

o  Load  level  (High  loads  @  CSS140,  low  loads  @  CSS  340) 

o  Load  type  (Upper  surface  panel  weights  reflect  compression 
load  requirements;  lower  surface  panel  weights  reflect 
tension  load  requirements. 

o  Panel  size  (Wide  column  lengths  and  plate  widths) 

o  Panel  cross-section  (Such  as  honeycomb  sandwich,  truss 
core  or  blade  stiffened  skin) . 

o  Damage  tolerance  category  (Fail-safe,  safe  crack 
growth  and  holes  vs  hole-free). 


The  calculated  weights  for  the  panel  concepts  are  shown  in 
Tables  V2-1  and  V2-2.  Definitions  of  terms  used  in  the  screening 
weight  tables  are  as  follows: 


Wt_QT  “  Total  weight  of  skin  panel  and  spar  cap  load 
carrying  material  in  lbs  per  inch  of  span. 

u  "  Weight  based  on  ultimate  static  load  considera- 

STATIC  tion  on  lower  surface. 


K 


r 


Allowable  stress  reduction  factor  imposed  by 
fatigue  and/or  damage  tolerance  requirements . 


FS: 


denotes  fail-safe  structure  without  holes 
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SCG:  "  denotes  slow  crack  growth  (non- fail-safe) 
structure  without  holes 

FSH:  ■  denotes  fail-safe  structure  with  holes 
SCGH:  ■  denotes  slow  crack  growth  structure  with  holes 


The  screening  weights  presented  in  Tables  V2-1  and  V2-2 
constitute  first-iteration  sizings  of  surface  panel  concepts 
based  on  optimum  panel  cross-sections  consistent  with  wing 
bending  requirements.  Shear  web  weight  requirements  are  not 
included.  Nor  are  fastener  weights  and  secondary  support 
structure  weights.  Thus,  the  indicated  weights  were  considered 
only  as  minimum  weight  potentials  for  the  various  structural 
concepts.  Those  concepts  which  were  selected  for  further  develop¬ 
ment  were  integrated  into  cross  section  drawings  and  were  sub¬ 
sequently  sized  and  weighed  in  detail  to  reflect  the  many 
secondary  considerations  associated  with  realistic  structural 
weights  during  the  definition  of  the  analytical  assemblies. 
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Table  XXIII 


WING  SURFACE  PANEL  CONCEPT  WEIGHT  ESTIMATES 
(CSS  140  -  LOWER  SURFACE) 


Concept 

No. 

Concept  Description 

Materials 

Damage 

Mode 

WSTATIC 

V 

Wt 

TOT 

610-012 

Modified  Triangular  Core 

A1 

7050-T76 

FS 

2.54 

1.00 

2.54 

610-012 

Modified  Triangular  Core 

A1 

7050-T76 

SCG 

2.54 

1.24 

3.15 

610-021 

Multiple  Rectangular  Tube 

Ti 

6A1-4V  (Ann.) 

FS 

2.05 

1.00 

2.05 

610-021 

Multiple  Rectangular  Tube 

Ti 

6A1-4V  (Ann.) 

FSH 

2.05 

1.17 

2.40 

610-021 

Multiple  Rectangular  Tube 

Ti 

6Al-4V(Ann.) 

SCG 

2.05 

1.21 

2.48 

610-021 

Multiple  Rectangular  Tube 

Ti 

6A1-4V  (Ann.) 

SCGH 

2.05 

1.21 

2.48 

610-021 

Multiple  Rectangular  Tube 

Ti 

8-8-2-3 

FS 

1.73 

1.00 

1.73 

610-021 

Multiple  Rectangular  Tube 

Ti 

8-8-2-3 

FSH 

1.73 

1.64 

2.84 

610-021 

Multiple  Rectangular  Tube 

Ti 

8-8-2-3 

FS 

1.73 

1.64 

2.84 

610-021 

Multiple  Rectangular  Tube 

Ti 

8-8-2-3 

SCGH 

1.73 

1.72 

2.97 

610-032 

Y-Tee  Stiffened  Skin 

Ti 

8-8-2-3 

FS 

1.73 

1.00 

1.73 

610-032 

Y-Tee  Stiffened  Skin 

Ti 

8-8-2-3 

SCG 

1.73 

1.64 

2.84 

610-034 

Triangular  Truss  Core 

Ti 

6A1-4V  (Ann.) 

FS 

2.06 

1.00 

2.06 

610-034 

Triangular  Truss  Core 

Ti 

6A1-4V  (Ann.) 

SCG 

2.06 

1.26 

2.60 

610-034 

Triangular  Truss  Core 

Ti 

8-8-2-3 

FS 

1.73 

1.00 

1.73 

610-034 

Triangular  Truss  Core 

Ti 

8-8-2-3 

SCG 

1.73 

1.64 

2.84 

610-034 

Triangular  Truss  Core 

A1 

7050-T76 

FS 

2.54 

1.00 

2.54 

610-034 

Triangular  Truss  Core 

A1 

7050-T76 

SCG 

2.54 

1.24 

3.15 

610-101 

Integral  Tee  Stiffened 

Ti 

6A1-4V  (Ann.) 

FS 

2.05 

1.00 

2.05 

610-101 

Integral  Tee  Stiffened 

Ti 

6A1-4V  (Ann.) 

SCG 

2.05 

1.26 

2.58 
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Table  XXIII 


(Contd) 


Concept 

No. 

Concept  Description 

Materials 

Damage 

Mode 

W 

STATIC 

K<r 

Wt 

TOT 

610-101 

Integral  Tee  Stiffened 

Ti 

8-8-2-3 

FS 

1.73 

1.00 

1.73 

610-101 

Integral  Tee  Stiffened 

Ti 

8-8-2-3 

SC6 

1.73 

1.64 

2.84 

610-105 

Integral  Blade 

A1 

7475-T7651 

FS 

2.44 

1.00 

2.44 

610-105 

Integral  Blade 

A1 

7475-T7651 

SCG 

2.44 

1.03 

2.52 

610-105 

Integral  Blade 

Al 

7475-T7651 

FSH 

2.44 

1.13 

2.76 

610-105 

Integral  Blade 

A1 

7475-T7651 

SCGH 

2.44 

1.13 

2.76 

610-105 

Integral  Blade 

Ti 

6A1-4V  (Ann.) 

FS 

2.05 

1.00 

2.05 

610-105 

Integral  Blade 

Ti 

6A1-4V  (Ann.) 

SCG 

2.05 

1.21 

2.48 

610-105 

Integral  Blade 

Ti 

6A1-4V  (Ann.) 

FSH 

2.05 

1.17 

2.40 

610-105 

Integral  Blade 

Ti 

6A1-4V  (Ann.) 

SCGH 

2.05 

1.21 

2.48 

610-105 

Integral  Blade 

Ti 

8-8-2-3 

FS 

1.72 

1.00 

1.72 

610-105 

Integral  Blade 

Ti 

8-8-2-3 

SCG 

1.72 

1.64 

2.62 

610-118 

Integral  Formed  Bulb  Tee 

Al 

7050-T76 

FS 

2.74 

1.00 

2  74 

610-118 

Integral  Formed  Bulb  Tee 

Al 

7050-T76 

SCG 

2.74 

1.24 

3.40 

610-118 

Integral  Formed  Bulb  Tee 

Ti 

6A1-4V 

FS 

2.05 

1.00 

2.05 

610-118 

Integral  Formed  Bulb  Tee 

Ti 

6A1-4V 

SCG 

2.05 

1.26 

2.58 

610-124 

Hat  Stiffened  Skin 

Ti 

8-8-2-3 

FS 

1.75 

1.00 

1.75 

610-124 

Hat  Stiffened  Skin 

Ti 

8-8-2-3 

SCG 

1.75 

1.64 

2.87 

610-124 

Hat  Stiffened  Skin 

Ti 

6A1-4V  (Ann.) 

FS 

2.05 

1.00 

2.05 

610-124 

Hat  Stiffened  Skin 

Ti 

6A1-4V  (Ann.) 

SCG 

2.05 

1.21 

2.48 
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Table  XXIII 


(Contd) 


Concept 

No. 

Concept  Description 

Material 

Damage 

Mode 

W 

STATIC 

V 

Wt 

TOT 

610-124 

Hat  Stiffened  Skin 

Ti 

6A1-4V  (Ann.) 

SCGH 

2.05 

1.21 

2.48 

610-124 

Hat  Stiffened  Skin 

A1 

7050-T76 

FS 

2.48 

1.00 

2.48 

610-124 

Hat  Stiffened  Skin 

Al 

7475-T761 

FS 

2.44 

1.00 

2.44 

610-124 

Hat  Stiffened  Skin 

A1 

7475-T761 

FSH 

2.44 

1.13 

2.76 

610-124 

Hat  Stiffened  Skin 

Al 

7475-T76 

SCG 

2.44 

1.03 

2.51 

610-124 

Hat  Stiffened  Skin 

Al 

7475-T761 

SCGH 

2.44 

1.13 

2.76 

610-128 

Honeycomb  Sandwich  Panels 

Al 

7050-T76 

FS 

2.52 

1.00 

2.52 

610-128 

Honeycomb  Sandwich  Panels 

Al 

7050- T76 

SCG 

2.52 

1.24 

3.13 

610-128 

Honeycomb  Sandwich  Panels 

Ti 

8-8-2-3 

FS 

1.95 

1.00 

1.95 

610-128 

Honeycomb  Sandwich  Panels 

Ti 

8-8-2-3 

SCG 

1.95 

1.64 

3.20 

610R-000 

Sculptured  Plate 

Al 

2024-T851 

SCGH 

2.50 

1.70 

4.25 

610R-007 

Full-Depth  Core;  Large 

Cell 

Ti 

8-8-2-3 

SCG 

2.20 

1.64 

3.16 

610R-010 

Honeycomb  Panels  - 
Composite  Slugs 

Ti 

8-8-2-3 

FS 

1.87 

1.00 

1.87 

610R-011 

Honeycomb  Panels  -  Channel 
Spar  Splice 

Ti 

8-8-2-3 

FS 

1.74 

1.00 

1.74 

610R- 

013B 

Laminated  Skin  -  Stepped 
Caps 

Al 

7050-T76 

FS 

2.30 

1.00 

2.30 

610R-014 

Full-Depth,  Large  Cell 

Core  Laminated  Skin 

Ti 

8-8-2-3 

FS 

1.85 

1.00 

1.85 

610R- 

Welded  Space  Truss  Sub 

Ti 

6-4- (Ann.) 

FS 

1.79 

1.00 

1.79 

015B 
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Table  XXIII 


(Contd) 


Concept 

Ho. 

Concept  Description 

Material 

Wt 

TOT 

610-012 

Modified  Triangular 

A1  7050-T76 

3.00 

610-012 

Modified  Triangular  Truss  Core 

Ti  6A1-4V  (Ann.) 

2.36 

610-021 

Multiple  Rectangular  Tubes 

Ti  6A1-4V  (Ann.) 

2.35 

610-021 

Multiple  Rectangular  Tubes 

Ti  8-8-2-3 

2.28 

610-021 

Multiple  Rectangular  Tubes 

Ti  6A1-4V  STA 

2.16 

610-032 

Y-Tee  Stiffened  Skin 

Ti  8-8-2-3 

2.04 

610-034 

Triangular  Truss  Core 

A1  7050-T76 

2.86 

610-034 

Triangular  Truss  Core 

Ti  6A1-4V  STA 

1.93 

610-034 

Triangular  Truss  Core 

Ti  8-8-2-3 

2.08 

610-034 

Triangular  Truss  Core 

Ti  6A1-4V  (Ann.) 

2.23 

610-101 

Integral  Tee  Stiffened 

Ti  6A1-4V  STA 

2.02 

610-101 

Integral  Tee  Stiffened 

Ti  8-8-2-3 

2.10 

610-101 

Integral  Tee  Stiffened 

Ti  6A1-4V  (Ann.) 

2.32 

610-105 

Integral  Blade  Stiffened 

Ti  6A1-4V  STA 

2.18 

610-105 

Integral  Blade  Stiffened 

Ti  8-8-2-3 

2.25 

610-105 

Integral  Blade  Stiffened 

Ti  6Al-4V(Ann.) 

2.33 

610-105 

Integral  Blade  Stiffened 

A1  7050-T7651 

2.87 

610-118 

Integral  Formed  Bulb  Tee 

Ti  6A1-4V  (Ann.) 

2.30 

610-118 

Integral  Formed  Bulb  Tee 

A1  7050-T76 

2.85 

610-118 

Integral  Formed  Bulb  Tee 

Ti  6A1-4V  STA 

2.02 
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Table  XXIII 


(Contd) 


Concept 

No. 

Concept  Description 

Material 

Wt 

TOT 

610-124 

Hat  Stiffened  Skin 

Ti  6A1-4V  STA 

2.02 

610-124 

Hat  Stiffened  Skin 

Ti  6A1-4V  (Ann.) 

2.30 

610-124 

Hat  Stiffened  Skin 

A1  7050-T76 

2.91 

610-128 

Honeycomb  Sandwich  Panels 

A1  7050- T76 

2.81 

610-128 

Honeycomb  Sandwich  Panels 

Ti  6A1-4V  STA 

2.03 

610-200 

Laminated  Plate  (B  ■  9.5) 

Ti  8-8-2-3 

4.16 

Sculptured  Plate  Fixed  Edg 

A1  7050-T7651 

3.06 

610R-000 

Baseline- Sculptured  Plate 

A1  2024-T851 

3.38 

610R-007 

Full-Depth  Core:  Large  Cell 

Ti  8-8-2-3 

2.38 

610R-010 

Honeycomb  Panels 

Ti  8-8-2-3 

1.98 

610R-011 

Honeycomb  Panels 

Ti  6A1-4V  STA 

1.91 

610R-013 

Hat  Stiffened  Skin 

A1  7050-T76 

2.81 

610R-014 

Laminated  Skin;  Full  Depth  Core 

Ti  6A1-4V  STA 

2.01 

610R-014A 

Space  Truss- Welded  Tube 

Ti  6A1-4V  STA 

1.85 

610R-028 

Honeycomb  Sandwich  Panels 

A1  7050-T76 

2.81 

610R-029 

Sculptured  Skin;  Fixed  Edges 

A1  7050-T76 

3.09 
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Table  XXIV 


WING  SURFACE  PANEL  CONCEPT  WEIGHT  ESTIMATES 
(WING  CSS  340  -  LOWER  SURFACE) 

Concept 

Wt 

No. 

Concept  Description 

Materials 

TOT 

610-016 

Modified  Triangular  Truss  Core 

A1 

7050-T76 

0.24 

610-016 

Modified  Triangular  Truss  Core 

Ti 

6A1-4V  (Ann.) 

0.33 

610-021 

Multiple  Rectangular  Tubes 

Ti 

6A1-4V  (Ann.) 

0.32 

610-034 

Triangular  Truss  Core 

Ti 

6A1-4V  (Ann.) 

0.35 

610-034 

Triangular  Truss  Core 

A1 

7050 

0.24 

610-101 

Integral  Tee  Stiffeners 

Al 

7475-T7651 

0.19 

610-101 

Integral  Tee  Stiffeners 

Ti 

6A1-4V  (Ann.) 

0.28 

610-105 

Integral  Blade  Stiffeners 

Al 

7475-T7651 

0.21 

610-105 

Integral  Blade  Stiffeners 

Ti 

6Al-4V(Ann.) 

0.32 

610-124 

Hat  Stiffened  Skin 

Al 

7050-T76 

0.24 

610-124 

Hat  Stiffened  Skin 

Ti 

6A1-4V  (Ann.) 

0.33 

610-128 

Honeycomb  Sandwich  Panel 

Al 

7050-T76 

0.27 

6 10 R- 104 

Baseline- Sculptured  Plate 

Al 

2024-T851 

0.49 

610R-100 

Honeycomb  Sandwich  Panels 

Al 

7050-T76 

0.42 

610R-102 

Adhesive  Bonded  Multi- Spar 

Al 

7050-T76 

0.18 

610R-103 

Honeycomb  Sandwich  Panels 

Ti 

6A1-4V  (Ann.) 

0.50 

610-118 

Integral  Formed  Bulb  Tee 

Al 

7475 

0.23 
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Table  XXIV 


(Contd) 


Concept 

No. 

Concept  Description 

Material 

Wt 

TOT 

610-016 

Modified  Triangular  Truss  Core 

A1  7050-T76 

0.29 

610-021 

Multiple  Rectangular  Tubes 

Ti  6A1-4V  STA 

0.37 

610-021 

Multiple  Rectangular  Tubes 

Ti  6A1-4V  (Ann.) 

0.38 

610-034 

Triangular  Truss  Core 

Ti  6A1-4V  (Ann.) 

0.39 

610-034 

Triangular  Truss  Core 

A1  7050 

0.28 

610-101 

Integral  Tee  Stiffeners 

A1  7050-T7651 

0.26 

610-101 

Integral  Tee  Stiffeners 

Ti  6A1-4V  STA 

0.31 

610-105 

Integral  Blade  Stiffeners 

A1  7050-T7651 

0.30 

610-105 

Integral  Blade  Stiffeners 

Ti  6A1-4V  STA 

0.37 

610-105 

Integral  Blade  Stiffeners 

Ti  6A1-4V  (Ann.) 

0.38 

610-124 

Hat  Stiffened  Skin 

A1  7050-T76 

0.28 

610-124 

Hat  Stiffened  Skin 

Ti  6A1-4V  (Ann.) 

0.32 

610-128 

Honeycomb  Sandwich  Panels 

A1  7050-T76 

0.27 

610-200 

Laminated  Plates 

A1  7050- T76 

0.45 

610-200 

Laminated  Plates 

Ti  8-8-2-3 

0.78 

6 10 R- 104 

Baseline- Sculptured  Plate 

2024- T851 

0.62 

610R-101 

Full-Depth  Core  Sandwich 

Ti  6A1-4V  STA. 

0.*'2 

610R-108 

Full-Depth  Core  Sandwich 

Ti  8-8-2-3 

0.28 

610R-109 

Multiple  Tension  Stra/lnte. Stiff . 

Ti  6Al-4V(Ann.) 

0.43 

6 10 R- 100 

Ribbon  Truss  Upr  Surf .Sandwich 

Al  7050-T76 

0.60 
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Table  XXIV 
(Contd) 


Concept 

No. 

Concept  Description 

Material 

Wt 

TOT 

610R-102 

Adhesive  Bonded  Multi- Spar 

A1-7050-T76 

0.18 

610R-103 

Honeycomb  Sandwich  Panels 

Ti  6A1-4V 
(Ann . ) 

0.49 

610-118 

Integral  Formed  Bulb  Tee 

Al  7475 

0.30 
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V.2.1  Screening  Procedure  Demonstration  Problem 

Sample  input  and  output  data  for  the  screening  procedure 
are  shown  on  the  following  pages.  From  the  input  data  sheet 
it  can  be  seen  that  the  concept  selected  for  sizing  is  a 
2024-T851  aluminum  alloy  sculptured  plate  representative  of 
the  upper  surface  of  the  baseline  wing  at  wing  center  spar 
station  140.  The  program  provides  for  a  considerable  amount 
of  flexibility  due  to  the  number  of  variables  which  may  be 
considered.  Primary  variables  include: 

“  stress  distribution  factors 

=  plate  buckling  widths 

Index  -  stipulation  for  either  plate  buckling  or 
wide  column  buckling 

PLAS  CAT  ■  plasticity  category.  Provides  for 

several  options  for  plasticity  reduction 
factors 

D  ■  increased  panel  depth  thickness  relative  to 
baseline 

L  -  column  length  when  applicable 

Tmin  =  minimum  material  gage 

EA  =  structural  efficiency  factor.  May  be  varied 
to  reflect  either  simple  support  or  fixed 
edges  for  plates. 

EXP  =  exponent  in  plate  buckling  equations 

P^  =  element  loads 

Fy  =  design  yield  stress 

TFy  =  typical  yield  stress 

TF.7  and  TFg^  ■  secant  intercept  stresses  for 

typical  stress -strain  curve 

Included  on  the  output  data  sheet  are: 

N  =  45.20  =  Rainberg-Osgood  shape  factor 
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KH  **  1.00  =  effective  depth  correction  factor 

Pi  =  element  applied  ultimate  loads 

N  =  plasticity  reduction  factor 

T  =  required  plate  gage  to  prevent  buckling 

SIG^  =  ultimate  applied  stress 

=  element  area  required  to  support  SIG^ 

P  =  material  density  (Lb/In^) 

PA^  =  x  SIGi 

DEL  At  =  (Pi  -  PAi)/SIGi 

Amin  =  minimum  spar  cap  area 
9 

ALC  »  .£  (At  +  DEL  Ai  +  A  MINi> 

=  total  area  of  load-carrying  material  in 
upper  (or  lower)  surface  (in^) 

WLC  =  P  ALC  =  weight  of  load-carrying  material 
in  lbs  per  inch  pf  spar 

The  final  upper  surface  weight  for  the  demonstration 
problem  is  3.37  lb  per  inch  of  span  and  corresponds  to  a 
total  load  carrying  area  of  33.67  inr  This  is  slightly 
conservative  since  the  minimum  area  required  is  33.59  in^ 
as  shown  by  the  print-out  of  the  load  carrying  area  iterations 
(ALC).  The  peak  compression  stress  developed  is  54500  psi 
(ultimate) . 


79 


Table  XXV 


WING  SURFACE  CONCEPT  SCREENING  PROCEDURE 
COMPRESSION  LOAD  CONDITION 


GENERAL  DYNAMICS 
360  PROCEDURE  WFH 


CONCEPT  NO:  BASELINE 

CONCEPT  TITLE:  SCULPTURED  PLATE  (2024-T851) 

WING  CSS:  140  UPPER 

LOAD  COND:  F400A  COMPRESSION  (ULT) 

INPUT  DATA 


K1 

0.7420 

K.2 

0.8300 

K3 

0.8830 

K4 

0.9550 

K5 

1.0000 

K6 

0.9500 

K7 

0.9050 

K8 

0.7890 

K9 

0.6500 

Stress  Distribution 
Factors 

SI 

3.2000 

S2 

14.0000 

S3 

2.0000 

S4 

13.3000 

S5 

1.5000 

S6 

12.4000 

S7 

1.2500 

13.7000 

S9 

2.1800 

Baseline  Plate 
Element  Widths 

B1 

12.5000 

B2 

12.5000 

B3 

12.9000 

B4 

13.3000 

B5 

12.8500 

B6 

12.4000 

B7 

12.5500 

B8 

12.7000 

B9 

12.7000 

Plate  Buckling 
Widths 

A1 

0.0 

A2 

0.0 

A3 

0.0 

A4 

0.0 

A5 

0.0 

A6 

0.0 

A7 

0.0 

A8 

0.0 

A9 

0.0 

INDEX 

2.0000 

PLAS  CAT 
2.0000 

HM 

12.1600 

D 

0.0 

L 

12.0000 

AO 

0.0 

WF 

0.0158 

T  MIN 
0.0200 

TC 

0.0 

AC 

0.0 

AB 

0.0 

AG 

0.0 

NF 

50.0000 

WBL 

2.6600 

EA 

3.6200 

EXP 

3.0000 

PM 

0. 

PI 

52430. 

P2 

354000. 

P3 

52110. 

P4 

386700. 

P5 

32990. 

P6 

366700. 

P7 

45400. 

P8 

139400. 

P9  QM 

33000.  3030. 

MATERIAL  IS  AL  2024 

ETU  -  0.  FSU  -  36000.  E  -  10700000.  DENSITY  -  0.10000 

FY  -  58000.  TFY  -  60000.  TF.7  -  60400.  TF.85  -  59200. 

EC  -  0.0  EB  -  0.0  EG  -0.0  KS  -  0.85000 

KJ  -  1.00000 


CONVAIR  AEROSPACE  DIVISION 
PROBLEM  OC5278-36 


FORT  WORTH  OPERATION 
10/11/72 


OUTPUT  DATA 


F.  7 

-  58386. 

,66  N 

-  45.20 

KH  - 

1.00 

I 

P 

SIG 

NT 

NS 

N 

T 

A 

PA 

CELA 

AMIN 

1 

52430. 

40454. 

1.0000 

1.0000 

1.0000 

0.4040 

1.2927 

52294. 

0.003 

0.0 

2 

354000. 

45252. 

0.9998 

1.0000 

0.9999 

0.4273 

5.9818 

270684. 

1.841 

0.0 

3 

52110. 

48141. 

0.9962 

0.9999 

0.9986 

0.4551 

0.9102 

43819. 

0.172 

0.0 

4 

386700. 

52067. 

0.8909 

0.9973 

0.9572 

0.4984 

6.6288 

345139. 

0.798 

0.0 

5 

32990. 

54520. 

0.5162 

0.9797 

0.7700 

0 . 5494 

0.8241 

44931. 

0.0 

0.288 

6 

366700. 

51794. 

0.9115 

0.9979 

0.9656 

0.4614 

5.7219 

296361. 

1.358 

0.0 

7 

45400. 

49341. 

0.9888 

0.9997 

0.9958 

0.4489 

0.5611 

27684. 

0.359 

0.0 

8 

139400. 

43016. 

1.0000 

1.0000 

1.0000 

0.4232 

5.7982 

249419. 

0.0 

0.204 

9 

33000. 

35438. 

1.0000 

1.0000 

1.0000 

0.3841 

0.8374 

29677. 

0.094 

0.0 

WLC  -  3.37 

ALC  -  35.60 
ALC  -  33.97 
ALC  -  33.59 
ALC  -  33.67 
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V.3 


SAMPLE  CALCULATIONS  FOR  ANALYTICAL  ASSEMBLIES 


Analytical  assemblies  were  sized  by  first  applying  a  section 
depth  magnification  factor  to  the  baseline  finite  element  loads  to 
account  for  differences  in  skin  panel  thicknesses.  Peek  allowable 
stresses  were  then  determined  for  both  the  upper  and  the  lower 
surfaces  and  the  corresponding  stress  distributions  defined  in 
accordance  with  the  stress  distribution  factors  from  the  baseline 
math  model.  Element  area  requirements  were  then  calculated 
consistent  with  the  design  loads  and  the  allowable  stresses.  In 
addition,  detail  checks  of  the  critical  and  upper  and  lower  surface 
elements  were  performed  to  substantiate  the  allowable  stress  levels 
used  in  the  element  area  calculations . 

The  general  sizing  process  outlined  above  is  illustrated  by 
the  sample  calculations  to  follow.  Analytical  Assembly  No. 

610RA003  is  used  for  the  sample  calculations.  This  assembly 
concept  was  subsequently  expanded  into  full  wing  box  concept 
610RW001. 

In  Table  XXVI  the  loads,  stresses  and  element  area  require¬ 
ments  for  Analytical  Assembly  No.  610RA003  are  tabulated.  Column 
headings  for  Table  XXVI  are  defined  as  follows: 

P()y  “  upper  surface  baseline  element  loads  (lbs.). 

Pql  -  lower  surface  baseline  element  loads  (lbs.). 

PUPR*  uPPer  surface  loads  magnified  by  depth  factor. 

PLWR"  l°wer  surface  loads  magnified  by  depth  factor. 

°UPR“  uPPer  surface  stress  distribution  for  610RA003. 

^LWR"  lower  surface  stress  distribution  for  610RA003. 

aUPR~  upper  surface  element  area  requirements  for  610RA003. 

ALWR"  lower  surface  element  area  requirements  for  610RA003. 

The  critical  compression  element  in  the  upper  surface  is 
element  number©.  This  element  is  a  7050-T76  aluminum  honeycomb 
sandwich  panel  stressed  to  -63800  psi  and  controls  the  level  of 
stresses  in  the  upper  surface  in  accordance  with  the  stress  distri¬ 
bution  factors  from  the  baseline  math  model.  The  peak  compression 
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ANALYTICAL  ASSEMBLY  NO.  610RA003 
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[T>»  Section  Depth 


stress  of -67,000  psi  occurs  on  element  number  five  (5)  which  is  not 
stability-critical  since  it  is  a  spar  cap  element.  A  structural 
stability  check  of  panel  number  four  (4)  is  performed  below: 

Basic  data: 


G  ■  67000  psi  ■  longitudinal  shear  modulus  of  Type  IB  5056 

aluminum  honeycomb  core. 

hc  ■  1.00"  ■  core  thickness 

tf  ■  .125"  *  gage  of  7050-T76  aluminum  alloy  facing 
material 

E  ■  10.5  x  10b  psi  •  7050-T76  modulus  of  elasticity 
■  .33  ■  Poisson's  ratio  for  facing  material 
B^  -  13.3  ■  panel  width,  inches. 

>1  ■  plasticity  reduction  for  the  effective  modulus 
(Ref.  Figure  41  ) 

U  "  ~hg  lc"f)  *  G  "  ~^'i  0Q25^2  (6700°)  "  85000  lb/in 


■  panel  shear  stiffness  per  inch 

Etrh^„  £  n 

-  f  c  =  (10.5  x  106)(.125)(1.00)2 

2(1  yj  2)  2  [ 1  -  ( .33)2] 

■  panel  bending  stiffness  per  inch 

.  .  (13.3)2(85000)  .  2.05 

n  D  TT2 (737000) 


Kc  ■  1.82  -  panel  buckling  constant 


KCU  .  (1.82) (85000) 
27tJ  (2)  (2 . 05) ( .  125) 


302000 


737000  lb  in2 
in 


Fcr  “  69000  psi  (Reference  Figure  41  ) 

Since  0^  -  -63800  psi  (from  Table  XXVI )  panel  strength  is 

adequate . 
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To  substantiate  the  lower  surface  stress  levels,  the 
maximum  operating  stress  is  compared  with  the  allowable  fatigue 
stress,  the  critical  crack  growth  stress  and  the  static  tension 
strength  of  the  material: 


^LWR  *  69500  psi  ■  maximum  applied  ultimate  stress  in  the 

lower  surface  (Reference  Table  V3-1) 


% 


Mu 

MO 

<37 


LWR 


“f^\ 


1.89  ■  ratio  of  ultimate  bending  moment  to 
maximum  operating  bending  moment. 

-  £15_Q°  -  37000  psi 

1.89  - 


■  maximum  operating  stress. 

Since  there  are  no  stress  risers  in  the  lower  skins,  Kt  ■ 
1.0  and: 

*37x1  ■  40300  psi  m  maximum  allowable  fatigue  stress  (Refer¬ 

ence  Figure  42 

There  are  no  bolt  holes  in  the  lower  surface,  consequently, 
crack  growth  is  based  on  specified  initial  surface  cracks. 

Thus,  for  a  4000-hour,  non-inspected,  fail-safe  structure: 

"  45000  psi  ■  critical  crack  growth  stress  for  part- 
through  crack  in  thick  spar  material 
(Reference  Figure  43  . 

Ci^g  m  39500  psi  ■  critical  crack  growth  stress  for  through 

crack  in  thin  laminates.  (Reference 
Figure  44  . 

r—  _  Ftu  „  7000  _  37000  psi 

^s  1.89  1.89 

■  maximum  allowable  operating  stress  based  on  material 
static  tension  strength. 

A  comparison  of  the  lower  surface  allowable  stresses  shows 
that  the  lower  surface  is  sized  by  material  static  strength 
limitations . 
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Figure  42 

C.S.S.  140  Lower  Surface 

ADP  Wing  Preliminary  Fatigue  Design  Allowable  Curves 
Based  on  Phase  IA  Tested  S/N  Data  (3-in.  Plate) 
Applicable  to  X7050-T73651  PL  Alloy 
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Figure  44  Design  Allowable  Curves  for  7050-T73651  Aluainun 

Surface  Flaw  in  t  -  0.1  in.  Sheet 


From  Table  XXVI  the  total  axial  load  carrying  area  required 
for  Analytical  Assembly  No.  610RA003  is: 

Alc  -  25.33  +  23.73  -  49.06  in2 

The  weight  of  the  axial  load  carrying  material  required  for 
the  analytical  assembly  is: 

WLC  "  PaLCL  "  (.101)  (49.06)  (48)  -  238  lbs. 

where:  ^  «  material  density 

L  -  length  of  analytical  assembly 

The  final  weight  breakdown  for  Analytical  Assembly  610RA003 
is: 

Bending  material  -  238.00  lbs. 

Shear  webs  -  26.04  lbs. 

Honeycomb  Core  ■  3.33  lbs. 

Upper  Panel 

Fasteners  -  6.51  lbs. 

Adhesive  -  10.02  lbs. 

TOTAL  WEIGHT  283.90  LBS. 


89 


610  RW  003 


V.4  SAMPLE  CALCULATIONS  OF  PRELIMINARY  DESIGN  WING 


Cross-section  required  at  CSS  107,  outboard  of  splice,  assuming 
no  penalty  for  holes,  in  order  to  obtain  a  data  point  for  skin 
thickness  curve.  Actual  thickness  must  reflect  lower  allowables 
for  holes  needed  to  splice  to  the  wing  pivot  test  fixture. 


Element  d) 

f 

(k  si) 

Nx 

(kips/in) 

(w) 

Px 

(kips) 

t  -  Nx/f 

A 

1 

44.0 

45.20 

1.03 

2 

49.0 

34.77 

(14.15) 

492.00 

.71 

10.04 

3 

55.0 

25.90 

.47 

4 

56.5 

41.16 

(14.60) 

601.00 

.73 

10.64 

5 

59.0 

31.10 

.53 

6 

56.0 

30.64 

(14.85) 

455.00 

.55 

8.13 

7 

53.2 

28.9 

.54 

8 

46.8 

7.24 

(14.20) 

103.00 

.15 

2.20 

9 

38.1 

15.80 

.41 

10 

46.2 

16.50 

.36 

11 

55.0 

9.0 

(14.20) 

127.80 

.16 

2.32 

12 

61.6 

29.00 

.47 

13 

65.7 

30.5 

(14.85) 

452.93 

.46 

6.89 

14 

69.5 

22.00 

.32 

15 

69.7 

48.0 

(14.60) 

700.80 

.69 

10.05 

16 

70.0 

17.50 

.25 

17 

65.4 

40.0 

(14.15) 

566.00 

.61 

8.65 

18 

60.4 

36.00 

.60 

’1)  See  Figure  40 

for  location  of  elements. 
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Cross-section  at  CSS  140: 


Element 

K 

f 

h 

A 

M 

1 

.740 

44.0 

5.196 

1.19 

272 

2 

.830 

49.0 

6.061 

6.79 

2,020 

3 

.923 

55.0 

6.925 

.95 

362 

4 

.952 

56.5 

7.351 

6.81 

2,830 

5 

1.000 

59.0 

7.777 

.56 

258 

6 

.950 

56.0 

7.702 

6.54 

2,830 

7 

.900 

53.2 

7.627 

.86 

352 

8 

.789 

46.8 

7.264 

3.51 

1,195 

9 

.645 

38.1 

6.900 

e 

oo 

228 

10 

.660 

46.2 

-3.436 

.89 

141 

11 

.785 

55.0 

-3.850 

2.70 

571 

12 

.879 

61.6 

-4.263 

.56 

147 

13 

.938 

65.7 

-4.446 

3.15 

1,650 

14 

.990 

69.5 

-4.628 

.91 

293 

15 

.994 

69.7 

-4.573 

5.48 

1,730 

16 

1.000 

70.0 

-4.417 

.58 

180 

17 

.931 

65.4 

-4.065 

5.50 

1,465 

18 

.861 

60.4 

-3.713 

1.16 

260 

23.43 

16,784* 

*v/s  16, 625  in  TR-4 


91 


Cross-section  required  at  CSS  190  using  Nx  curves  (F400A) : 


.ement 

f* 

Nx 

(w) 

Px 

t  -  Nx/f 

A 

1 

44.0 

33.9. 

.77 

2 

49.0 

15.7 

(11.8) 

185.0 

.35 

3 

55.0 

17.5 

.32 

4 

56.5 

20.6 

(11.11) 

229.0 

.38 

5 

59.0 

17.2 

.29 

6 

56.0 

18.9 

(11.61) 

219.0 

.35 

7 

53.2 

16.6 

.31 

8 

46.8 

16.1 

(11.04) 

178.0 

.34 

9 

38.1 

28.5 

.75 

10 

46.2 

42.0 

.91 

11 

55.0 

14.0 

.25 

12 

61.6 

23.5 

.38 

13 

65.7 

17.0 

.26 

14 

69.5 

25.0 

.36 

15 

69.7 

21.0 

.30 

16 

70.0 

21.0 

.30 

17 

65.4 

16.5 

.25 

18 

60.4 

33.5 

.55 

♦Distribution  as  at  CSS  140 
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Ref:  Analytical  Assembly  610  RA  029 


Obtain  skin  and  cap  areas  at  CSS  270  using  baseline  loads  (see  610  RW  001)  for 
Cond.  F400A .  ' 


% 


£ 


<5 


X 

t 

A 

Nx 

Px 


t 

A 

Nx 

Px 


-20.2 

!  -23.23 

| 

-75.70 

-26.70 

-28.9 

-26.20 

-28.4 

-23.5 

- 

.300 

- 

.285 

- 

.285 

- 

.230 

.8 

j 

.42 

| 

.431 

j 

.440 

i 

1 

-6.98 

| 

-7.61 

-7.47 

i 

i 

-5.41 

-16.16 

I  -59.33  | 

-10.79 

-64.69  ! 

-12.46 

-63.50 

-12.50  I 

j 

-45.99  | 

b 

—  8.5  -- 

-  4- 

8.5  — 

1 

— r 

9.0 

+ 

8.6 

^s>© 

@ 

© 

© 

© 

@ 

@ 

11) 

32.0 

34.35  ! 

35.8 

36.00 

38.1 

34.75  | 

35.9 

29.65 

- 

.188 

-  i 

i 

.188  i 

- 

.170  j 

- 

.165 

.90 

i 

.42 

1.598  j 

.415 

1 

i 

j 

.370 

1.42 

6.46  , 

6.77  j 

.591 

4.89 

28.8 

54.91  | 

15.04 

57.53  j 

15.81  | 

53.17  I 

13.28  | 

42.07 

-25.1 


.815 


10 

30.2 


.725 


21.90 
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1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 


K 

f 

(p)rqd 

<a)rqD 

WIDTH 

t 

CCR 

.699 

-41.24 

-16.16 

.392 

.804 

-47.44 

-59.33 

1.251 

8.5 

.161 

.889 

-53.04 

-10.79 

.203 

.924 

-54.52 

-64.69 

1.187 

8.5 

.166 

1.000 

-59.00 

-12.46 

.211 

.907 

-53.51 

-63.50 

1.187 

9.0 

.170 

.983 

-58.00 

-12.50 

.216 

.813 

-47.97 

-45.99 

.959 

8.6 

.149 

.869 

-51.27 

-20.46 

.399 

.793 

55.51 

21.90 

.395 

.778 

54.46 

42.07 

.772 

8.6 

.090 

.942 

65.94 

13.28 

.201 

.912 

63.84 

53.17 

.833 

9.0 

.098 

1.000 

70.0 

15.81 

.226 

.945 

66.15 

57.53 

.870 

8.5 

.102 

.940 

65.80 

15.04 

.229 

.902 

63.14 

54.91 

.870 

• 

00 

.102 

.840 

58.80 

28.8 

.490 

10.941 
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Sizing  at  CSS  340  will  be  based  on  minimum  gages  for  manufacture, 
since  83  psi  fuel  pressure  loadings  in  3.00  (fixed  ended  bays) 
maximum  width  inside  spar  caps  requires: 


t  -i 


6M  _  /  6(83)9 
7(104)  / 12(7)104 


.073  . 


Maximum  spar  spacing  at  CSS  270  is  9.0  in.,  between  CS  and  AAS. 
Unsupported  plate  width  -  9.0  -  2.5  -  6.5. 

„  _  6.0(107)(t62)  7.06  (103),  CE(t6  }  »  Nx 

C  "  (6.5)2  "17  b2  t6 

C  -  6 


c6 


7.06(6.5)2 

6.0(104)  '  (t6>RQD  "  .170  in. 


^4) ROD  "  V7-*  **3(6.0)  “  »166  in. 

1  (6.0) 104 


(t2) 


3 1 6^9.7  (6.0)  2  _ 

(6.0)104  *161  1  * 


Wall  thickness  for  pivot  pylon  fitting: 

fb  -  70 (103)  -  '•’°2(al0oVt’^>  *  11  "  -556 

(£*§V  t 
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Upper  skin  thicknesses  at  CSS  233: 


BAY  2  t  -  .200  in. 

x  4  t  ■  .225  in. 

x  6  t  ■  .240  in. 

x  8  t  ■  .200  in. 

Find  thickness  of  upper  plates  at  CSS  233: 


t3  _  (Nx)t> 

t  RQD 

63(10°) 


^C6  ^rod  “  14(.7!o)  '  ^^RQD  "  *2^0 


RQD  63 (103) 


(t83) 


-  2,-5U,3r 

RQD  63 (103) 


(t8>RQD  '  -200 


(t3)  .  13.5(7-3) 

v>t4  •'RQD 


63 (103) 


^4) RQD  "  *333 


(t^)  "  '  (t2)  "  .200 

RQD  63 (103)  RQD 


Find  thickness  of  upper  plates  at  CSS  190  for  buckle  resistance 
at  ultimate  load: 

F  -  6.0(10. 5)loV  .  Nx 

b2  T 


c3 

c  RQD 


(t2) 


(Nx)b3 

6^77 


3  _  15.7(8.8)' 


RQD 


63 (103) 


(t2) 


RQD 


.268 
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Upper  skin  required  in  BAV  2  ,  FS  to  FAS: 


BAY 

WIDTH 

b  - 

WIDTH, BOLT 
TO  BOLT 

NX 2  UPPR 

X  10"3  LBS 
PER  INCH 

CR  I 

NX2  (b2) 

1/3 

CSS 

z 

.6.98(10.5)10 

tFINAL 

107 

14.0 

11.8 

35.5 

.568* 

.879 

118 

13.5 

11.3 

31.0 

.496* 

.730 

120 

140 

13.1 

10.9 

27.0 

.432* 

.518 

160 

180 

193 

11.3 

9.1 

16.4 

.265 

.350 

200 

210 

10.7 

m 

• 

oo 

13.0 

.234 

.295 

220 

233 

9.8 

7.6 

9.4 

.195 

.200 

240 

250 

9.2 

7.0 

8.5 

.178 

.195 

260 

268 

8.6 

6.4 

6.5 

.154 

.161 

280 

292 

7.7 

5.5 

3.5 

.113 

.125 

300 

340 

6.0 

3.8 

.75 

.053 

.067 

^Limited  by  F  ■  62.5 

ksi 
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Upper  skin  required  in  BAY  4  ,  FAS  to  CS 


t 


CSS 

BAY 

WIDTH 

b  - 

WIDTH,  BOLT 
TO  BOLT 

NX4  UPPR 

X  10"3  LBS 
PER  INCH 

CR  - 
NX4  (b2) 

1/3 

6.98(10.5)10*- 

107 

14.5 

12.3 

41.5 

.664* 

118 

14.2 

12.0 

33.5 

.536* 

120 

140 

13.1 

10.9 

29.5 

.472* 

160 

180 

193 

11.2 

9.0 

21.0 

.336* 

200 

210 

10.6 

8.4 

17.5 

.280* 

220 

233 

9.8 

7.6 

13.5 

.220 

240 

250 

9.2 

7.0 

11.0 

.194 

260 

268 

8.6 

6.4 

7.5 

.161 

280 

292 

7.7 

5.5 

5.5 

.131 

300 

340 

6.0 

3.8 

1.0 

.058 

♦Limited  by  F^y  ■  62.5  ksi 
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Upper  skin  thickness  required  for  stability  in  BAY  6  ,  between 
CS  and  AAS: 


CSS 

BAY 

WIDTH 

b  - 

WIDTH, 

BOLT-BOLT 

NX6  UPPR 

X  10”3  LBS 
PER  INCH 

107 

14.8 

12.6 

118 

14.4 

12.2 

32.0 

120 

140 

13.6 

11.4 

27.0 

160 

180 

193 

11.9 

9.7 

18.5 

200 

210 

11.2 

9.0 

16.5 

220 

233 

10.4 

8.2 

14.0 

240 

250 

9.7 

7.5 

12.5 

260 

268 

9.0 

6.8 

7.5 

280 

292 

8.1 

5.9 

6.0 

300 

340 

6.2 

4.0 

• 

♦Limited  by  FCy  ■  62.5 

ksi 

CR 


NX6  (b  ) 


1/3 


.512* 


.432* 


.296* 


.263 


.234 


.209 


.168 


.142 
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Lower  skin  thickness  in  BAY  2  : 


u  _ 

CR 

2 

35  bz 

l1/2 

4LWR 

35000 

^PTMAT 

NX2 

LWR 

CSS 

WIDTH 

b 

•5NX2LWR 

6.98(104) 

-  * 

r  INAL, 

(IN) 

C  1NAJL, 

(KSI) 

107 

14.0 

10.9 

17.50 

.244 

.500 

118 

13.5 

10.4 

16.75 

.233 

.479 

120 

140 

13.1 

10.0 

13.75 

.224 

.393 

.410 

67.07 

160 

180 

193 

11.3 

8.2 

8.25 

.184 

.236 

.252 

65.48 

200 

210 

10.7 

7.6 

6.75 

.170 

.193 

220 

233 

9.8 

6.7 

5.50 

.150 

.157 

.180 

61.11 

240 

250 

9.2 

6.1 

4.50 

.137 

.129 

260 

268 

8.6 

5.5 

3.75 

.123 

.107 

.180 

41.67 

280 

292 

7.7 

4.6 

2.75 

.103 

.079 

300 

340 

6.0 

2.9 

.80 

.065 

.023 
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Lower  skin  thickness  in  BAY  4 


CSS 

WIDTH 

b 

. 5NX4LWR 

t 

CR 

2 

35  bz 

1/2 

.  5  NX 

4LWR 

35000 

CFINAL 

nx4lwr 

CFINAL 

(KSI) 

6.98(104) 

107 

14.5 

11.3 

23.75 

.253 

.679 

118 

14.2 

11.0 

22.50 

.246 

.643 

.645 

69.77 

120 

140 

13.1 

9.9 

14.50 

.222 

.414 

.410 

70.73 

160 

180 

193 

11.2 

8.0 

10.50 

.179 

.300 

.300 

70.00 

200 

210 

10.6 

7.4 

8.25 

.166 

.236 

.250 

66.0 

220 

233 

9.8 

6.6 

6.50 

.148 

.186 

240 

250 

9.2 

6.0 

5.50 

.134 

.157 

.186 

59.14 

260 

268 

8.6 

5.4 

4.25 

.121 

.121 

.170 

50.00 

280 

292 

7.7 

4.5 

3.75 

.100 

.093 

.150 

43.33 

300 

340 

6.0 

2.8 

1.00 

.063 

.029 

.100 
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Lower  skin  thickness  in  BAY  6 


BAY 

CSS  WIDTH 


•  5NX 
>-3 


X  10 

PER  INCH 


6LWR 

IN-LBS 


CCR  " 

jsjsI 


6.98(10*) 


1/2 


107 

14.8 

11.6 

13.75 

118 

14.4 

11.2 

13.20 

120 

140 

13.6 

10.4 

13.50 

160 

180 

193 

11.9 

8.7 

8.50 

200 

210 

11.2 

8.0 

6.75 

220 

233 

10.4 

7.2 

6.00 

240 

250 

9.7 

6.5 

5.75 

260 

268 

9.0 

5.8 

3.50 

280 

292 

8.1 

4.9 

2.00 

300 

340 

6.2 

3.0 

1.00 

.259 

.251 

.233 

.195 

.179 

.161 

.146 

.130 

.110 

.070 


*5NX6LWR 

35000 

.393 

.377 

.386 


.243 

.193 

.171 

.164 

.100 

.057 

.029 
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SLAT  ATTACHMENT 


M 


-  78500  in- lbs  (ult) 

-  3290  lbs  (ult) 

-  3370  lbs  (ult) 


78500 

7.5 


10467  lbs  (ult) 


3290 

TAN23* 

3370 

2 


7402 


1685 


10467  +  7402  -  1685 

COS  23° 

-  17710  lbs 
10,467  +  1685 

-  12152  lbs 


The  reactions  (17710  at  upper  surface  and  12152  at  lower  surface) 
are  provided  along  6  inches,  spanwise,  using  four  1/4  inch 
fasteners  (19000  lbs  capacity). 

Find  thickness  at  first  row  of  bolts  in  pivot  FTG  splice. 


ICj  -  3.4,  TL  -  7050-T73651 

(Ft) FATIGUE  ■  33 «° *  62.38  ksi 

(Ft>F.S.  +  BOLT  “  30-2<15tf)  "  57.09 
(Ft) STATIC  “  70.00  ksi 
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Using  existing  5/8  bolts  at  2.40  spacing. 


t 


,47000.  ,  2.400 

'57090'  4.400-. 625' 


1.113  in. 


OUTBOARD  FIXED  PYLON 


FWD  (f  PYLON) 


£  C  SPAR 


46,4350  /V-  L3J> 


Obtain  skin  thickness  between  F.S.  and  F.A.S.  required  to 
introduce  1197270  in-lbs  (normal  to  C.S.)  and  464390  in-lbs 
torsion  (in  box  between  F.S.  and  F.A.A.). 


- — ■ 2221Q  .  . ..  ■  tRnn  •  .405  in.  (at  section  1-1,  next  page) 

(6.50)6.50(70)10J  RQD 


1197270  _ 

7.5(32.00) 70 (103)  RQD 


•071  in.  (at  section  2-2) 
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PYLON 

£ 


Fixed  pylon  fwd  bolt  attachment: 

.3125  bolts  Fs  -  150  ksi,  Pg  -  12.27  K  each 

Flange  Load  ■  H97270  ■  184195  lbs. 

6.5 


184195 

12.27 


15 
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Inboard  fixed  pylon: 


PYLON  £ 


FAS  £ 


CS  £ 


Obtain  skin  thickness  between  FAS  and  CS  required  to  introduce 
1>254,560  (COS  21s2°)  ■  1169656  in~lbs  (all  pitching  in  pylon 
plane  is  taken  as  a  couple  between  the  two  fwd  bolts  and  the 
aft  hook  with  a  30  in.  couple  arm) . 


1169656 

9.0(10.0) 70(103) 


Crqd  "  •18(>  in.  (at  section  a-a) 
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Fixed  pylon  attachment: 


\Z8l35 


|- —  3.0  — -j 


♦Check  also  for  -41685/2  lbs  (with  negligible  Mx)  •  OK 

Section  A-A  must  have  bolt  receptacles  for  138370  lbs  and  must 
be  capable  of  resisting  1,197,270  in- lbs. 


/33Q3O(9.0) 

S.3  (^>o)^0(ioij  ~ 


.  $73 
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V .  5  STIFFNESS  REQUIREME  TTS 

The  baseline  F-111F  wing  flutter  and  vibration  margins 
have  been  established  for  existing  hardware.  The  margins 
exceed  50%  for  the  clean  wing. 

The  flutter  margins  for  the  wing  and  stores  combinations 
are  estimated  in  many  cases  from  the  analysis  of  the  F-111A. 

In  these  cases  the  margin  for  the  F-111F  was  considered  to 
exceed  the  F-111A  margin  due  to  the  greater  stiffness  of 
the  F-111F  and  carry-through  structure. 

Table  XXVII  lists  the  stiffness  margins  estimated  for 
the  F-111F  for  all  of  its  store  carriage  combinations.  The 
store  combinations  are  defined  in  Table  XXVIII. 

To  obtain  these  margins  it  has  been  assumed  that  for  a 
reasonable  uniform  change  the  stiffness  (k)  is  a  function  of 
the  frequency  squared  (w^).  Also,  that  flutter  speed  (V) 
is  proportional  to  frequency.  Then,  V  is  proportional  to 
y!T.  The  stiffness  reduction  percentage  quoted  in  Table  XXVII, 
is  the  amount  which  could  be  applied  to  K  and  still  retain  an 
adequate  flutter  speed  to  clear  the  configuration  at  its 
present  operational  level  from  an  analysis  standpoint. 

This  is  an  obvious  oversimplification  but  it  has  value 
in  preliminary  design  and  trend  evaluations.  Specific 
changes  from  the  F-lll  when  they  are  designed  in  detail, 
merit  a  flutter  analysis  to  more  adequately  consider  the 
problem  variables.  At  that  time  it  may  be  possible  to 
achieve  adequate  flutter  margins  for  store  carriage  by 
adjusting  mass  and  stiffness  rather  than  by  simply  increasing 
stiffness . 
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Table  XXVII 


ESTIMATED  STIFFNESS  MARGINS  ON  F-111F  WING 


Loadings  from 

Table  XXVIII 

Group  Number 

Estimated 
Stiffness  Red. 

Available  (70) 

Remarks 

1-6 

42 

7-9 

20 

F-111F  Analysis  @  50°  and  26°  indicates  better 

margin  probable 

10-12 

26 

Flight  test  was  required  to  clear  this  con- 

figuration  originally  on  F-111A 

13-15 

31 

16-17 

50 

Flight  test  has  problems  with  carriage  and 

release  of  this  configuration 

18-19 

27 

20-23 

50 

See  Note  1 

24-27 

42 

28-30 

50 

See  Note  1 

31-31B 

42 

32-33 

49 

34 

45 

• 

35 

39 

* 

36 

36 

37 

43 

38-39 

50 

40-45 

43 

46-48 

50 

49 

36 

50-51 

47 

52-53 

50 

See  Note  1 

54-57 

42 

58-60 

50 

See  Note  1 

61 

45 

62 

47 

63-66 

44 

67 

50 

68-70 

45 

71-72 

50 

See  Note  1 

73 

21 

74-79 

23 

Clean  Airplane 

50 

Note  1:  Operating  limits  should  be  based  on  flight  test  results  since  flight 
control  problems  were  encountered  during  original  flight  testing. 
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F-111A  EXTERNAL  STORES  LOADING 
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Table  XXVIII  (Contd) 
F-111A  EXTERNAL  STORES  LOADING 
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F-111A  EXTERNAL  STORES  LOADING 
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F-111A  EXTERNAL  STORES  LOADING 
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-Ill  EXTERNAL  STORES  LOADING 
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Table  XXVIII  (Contd) 
F-111A  EXTERNAL  STORES  LOADING 
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Available  Flutter  Speed  Margin  (7o) 


Figure  45  Allowable  Wing  Stiffness  Reduction 
vs  %  Flutter  Speed  Margin 
(Minimum  Margin  20%) 


116 


40 

38 

36 

34 

32 

30 

28 

26 

24 

22 

20 

18 

16 

14 

12 

10 

8 

6 

4 

2 


30  40  50  60 

Available  Flutter  Speed  Margin  (7.) 


Figure  46  Operating  Envelope  Reductions 

for  Various  Wing  Stiffness  Reductions 
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Drawing  No. 
610RWOOO 

Box  torsion  due  to  10^  in- lbs  between  nodes  immediately 
outb'd  of  CSS  140: 


^37 


200 

210 

199 

209 

236 
246 

237 
245 


58.24899 

113.76500 

58.24899 

113.76500 

48.19099 

109.18900 

59.11699 

109.18900 


193.29999 

182.29999 

193.29999 

182.29999 

158.50000 

146.79999 

156.29999 
146.79999 


-2.14072 

-2.67257 

1.85078 

6.14462 

-2.06219 

-3.18356 

4.91471 

6.65075 


•.01770 

.02437 

.00674 

.03359 

.00917 

.01642 

.01709 

.02313 


.01718 

.00625 

.00698 

.00287 

.01233 

.00462 

.00026 

.00186 


.09365 

.30219 

.09365 

-.30218 

.06913 

-.18476 

.02597 

-.18476 
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A1  (200,210)  -  .39584,  B  -  ARCTAN  *-3958^ 

55.51101 

(199.209)  -  .39583 

(236,  246)  -  .25389,  Q  -  ARCTAN  ^89Q1 

A©  -  .1700810245°  -  2.96847  (10"3)  RAD 

AL«  42.5000  +  34.7999  -  38.64995 

2 

GJ  -  106  (38.64995)  -  13.02016 (109)  LB- IN2 

2.96847(10-3) 

-  90.4178  (106)  LB-FT2 


Drawing  No. 
610RW000 

-  .408559974° 

-  .2384789495° 
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Drawing  No. 
610RW002 


Cells  Not  Effective  in  Torsion 
Box  Torsion  due  to  10  6  in- lbs 


.24  L 


X 

Y 

Z 

X 

Y 

Z 

200 

210 

58.24899 

113.76500 

193.29999 

182.29999 

-2.14072 

-2.67257 

-.04142 

-.05745 

.03920 

-.00704 

.26924 

-.47372 

199 

209 

58.24899 

113.76500 

193.29999 

182.29999 

1.85078 

6.14462 

.00594 

.05807 

.01532 

.00531 

.26923 

-.47371 

236 

246 

48.19099 

109.18900 

158.50000 

146.79999 

-2.06219 

-3.18536 

-.01817 

-.03150 

.03075 

-.00199 

.17531 

•p.26674 

237 

245 

59.11699 

109.18900 

156.29999 

146.79999 

4.91471 

6.65075 

.02316 

.03331 

.00149 

.00053 

.10483 
- .26674 
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Drawing  No. 
610RW002 


AZ  (200,210)  -  .74296,  ARCTAN  5^Z^296_  _ 

AZ  (199,209)  -  .74294 

AZ  (236,  246)  -  .44205,  e  -  ARCTAN  ^;gg3Q1 

AQ  =  .3515887663  -  6.13638  (10~3)  RAD 
AL  =  38.64995 

GJ  -  106  (38.64995)  _  0 

- 1 -  6.29849  (109)  Lb-In2 

6. 13638(10"3) 

-  43.73951  (106)  Lb-Ft 


7668015879° 

-  .4152128216° 


121 


Dwg.  No. 

MATH  MODEL  WITH  CELLS  EFFECTIVE  IN  TORSION  610RW002 


Due  to  100 , 000  In- lbs  torsion 

at  Node  777:  -  .00678  in 

Ah  at  Node  27:  .00678  in 


(X) 77?  -  112.07280 

(X)2?  -  65.17020 

46.90260 


(Y)777  -  169.17130 

(Y)27  -  178.96999 

8.89869 


(46.90260)2  +  (8.89869)2  -  47.73930  in 


SIN  •  -  2 (.00678) /47. 73930  -  2.84043  (10-4) 
•  -  .01627  °/100,000  in- lbs 


GJ 


100,000 (22.5167) 
.01627 


138.393,734 


Lbs.in^ 

Deg. 


GJ 


138,393,734(180) 

144  (  ) 


55,065,117 


Lbs  ft2 
Radian 


*  This  model  represents  22  inches  outboard  of  CSS  140 

with  all  cell  material.  The  number  of  elements  limits  the 
total  size  of  the  model. 

Stiffness  Reduction  =  90.4178  (106)  -  43.73951  (106) 

-  46.67829  (106) 

4fr»ffl3  -  51.63% 

90.4178 

Using  model  with  cell  stiffness  (same  location) 

GJ  «  55.065  (10**)  Lbs-ft2  and  stiffness  reduction 
■  90.4178  (10^)  lbs-ft^  and  stiffness  reduction 

35.3528  (106)  _ 

'56.4178  ’ho®) 


39.10% 
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V . 6  SAMPLES  OF  USE  OF  FINITE  ELEMENT  MODELS  FOR 

DESIGN  DETAILS 


Figure  47  is  a  portion  of  the  baseline  wing  finite 
element  model  with  a  circular  cutout  in  the  lower  surface  for 
the  inboard  pivoting  pylon  at  Center  Spar  Station  120.  This 
model  was  loaded  with  condition  F400A  while  using  various 
schemes  for  metal  placement  around  the  cutout. 

Figures  48  and  49  is  the  lower  skin  of  the  portion  of  the 
model  of  Figure  47.  The  structure  immediately  around  the  cut¬ 
out  is  shown  in  detail  in  Figures  50  and  51  with  principal 
stresses  printed  in  the  plate  elements.  Stresses  outboard  of 
the  cutout  and  around  the  cutout  can  be  compared  for  selection 
of  reinforcement.  In  this  example  the  net  area  through  the 
cutout  is  equal  to  the  section  area  before  the  cutout  was  made. 

Figure  52  models  the  stresses  in  the  lower  skin  flap 
attachment  tabs  when  50  ksi  are  applied  to  the  lower  surface 
bending  material.  Constant  stress  areas  are  shaded. 
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Figure  47  portion  of  Baseline  Wing  Finite  Element  Model 
with  Inboard  Pivoting  Pylon  Cutout 
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Figure  48  Finite  Element  Model  Showing  the 
Thickness  of  the  Lower  Skin 
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Figure  49  Finite  Element  Model  Showing  the 
Principal  Stresses  in  the  Lower  Skin 
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Figure  50  Finite  Element  Model  Showing  the 

Thickness  of  the  Lower  Skin  Around  the  Cutout 
for  the  Inboard  Pivoting  Pylon 
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Figure  51  Finite  Element  Model  Showing  the  Principal 
Stresses  in  the  Lower  Skin  Around 

the  Cutout  for  the  Inboard  Pivoting  Pylon 
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Figure  52  Finite  Element  Model  Showing  the 
Lower  Skin  Flap  Attachment  Tab 
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V . 7  ESTIMATE  OF  WEIGHT  SAVED  BY  REMOVAL  OF  LOWER  SURFACE 

FASTENERS 


It  is  possible  to  make  an  estimate  of  the  factors  contri¬ 
buting  to  weight  savings.  For  this  purpose  it  is  convenient  to 
compare  Analytical  Assemblies  610RA000  (Baseline  at  CSS  140) 
and  610RA006  (Laminated  Lower  Skin/Corrugated  Spar  at  CSS140). 

The  weights  given  below  show  approximately  237«  weight 
reduction.  The  greatest  reduction  is  in  the  weight  of  the 
lower  skin.  It  must  be  noted,  however,  that  the  surface 
stresses  are  optimum  only  locally  and  that  sealing  requires 
material  that  cannot  be  used  efficiently. 

The  610RA000  assembly  lower  surface  is  sized  for  a  maximum 
stress  of  20.80  KSI*.  Figure  53  allowables  would  permit  a 
theoretical  weight  reduction  of  19.467.  as  shown  below,  due 
exclusively  to  elimination  of  holes. 

Changing  material  to  7050-T76  and  eliminating  the  holes 
would  permit  a  44.28%  weight  reduction  of  the  lower  surface. 
This  is  illustrated  below  with  the  aid  of  Figure  54. 

Changing  material  to  7050-T76  without  eliminating  the 
holes  would  permit  a  20.087.  weight  reduction  based  on 
Figure  55. 

These  estimates  are  useful  for  observing  that  in  the 
case  considered  approximately  half  the  weight  saved  is  due 
to  material  change  and  half  is  due  to  elimination  of  fas ten sr 
holes . 


*Note  that  this  stress  was  lowered  to  19.60  KSI  for  preliminary 
design  wings. 
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Drawing  No. 
610RA000/610RA006 


DISTRIBUTION  OF  WEIGHT  SAVINGS  (Al) 


B 


610RA000 

610RA006 

Wt  of  Lwr  Skin  - 

176.44 

Lbs  34% 

-  115.79  Lbs. 

1/2  Spar  Wts  - 

33.01 

26.86 

209.45 

32% 

142.63 

Wt  of  Upr  Skin  - 

130.68 

Lbs 

122.82 

1/2  Spar  Wts 

33.01 

26.87 

163.69 

-8.67. 

149.69 

384.89 

296.94 

Baseline  Wts  (A)  are  due  to  operating  at  39.0  KSI  (Ultimate) 
because  of  material  properties,  hole  effects  and  other 
design  features. 

209.45  -  142.63  -  66.82 

66.82/209.45  -  .32  -  327. 

Baseline  Wts  (B)  are  greater  than  610RA006  Wts  (Bl 

because  of  wider  spar  spacing,  lesser  spar  torsional 
rigidity  and  machined  spars. 

163.69  -  149.69  -  14.00 
14.00/163.69  -  .09  -  97. 

Baseline  Wts  (C)  are  greater  due  to  Lwr  Skin  Bolts 

1.  Effect  of  removal  of  Lwr  Skin  holes  on  2024-T81 

Baseline  stress  used  with  wts  shown  -  20.70  KSI  (MAX.  OPRTG) , 
allowable  baseline  I*r  Skin  stress  without  holes  -  25.80  KSI 
(For  2000  Hr  depot  inspectable  slow  crack  growth) 

Possible  weight  seving  -  1  -  |2r™  _  1946% 

(Ref:  Figure  53) 
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Drawing  No. 
610RA000/610RA006 


2.  Effect  of  changing  from  2024- T81  to  7050-T76  and 
removing  holes,  using  part  through  surface  crack  8000  hr 
slow  crack  growth  allowables: 

Possible  weight  saving  »  1  -  -  31.007. 

(Ref:  Figure  54) 

3.  Effect  of  changing  from  2024- T81  to  7050-T76  (leaving 
holes,  as  in  baseline) 

Possible  weight  saving  -  1  -  20. 70  m  20  087. 

25.90  * 

(Ref:  Figure  55) 
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I  Thickness,  t  =  .611  in 
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Initial  Crack  Length,  2cQ,  in. 
Figure  53  F-111F  C.S.S.  140  Lower  Surface 


TSX  ‘umj^oads  uj  ssaans  *xew 
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Figure  54  Phase  IA  Fracture  Design  Allowables 

7050  Al.  Alloy  Pi. 

Part  Through  Surface  Crack 
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Figure  55  C.S.S.  140  7050  Al.  Alloy  5/16  Bolt  Hole  Through  Crack 


APPENDIX  VI 


FATIGUE  AND  FRACTURE  ANALYSIS 

VI. 1  FATIGUE  DESIGN  DATA 


Additional  details  concerning  development  of  fatigue  design 
data  and  the  preliminary  S/N  data  assumed  for  new  materials  early 
in  Phase  IA  are  presented  in  this  section. 

The  procedure  used  to  develop  sufficient  fatigue  analyses 
to  allow  determination  of  fatigue  design  allowables  and 
determination  of  fatigue  damage  for  intermediate  Kx's  by 
crossplotting  is  described  as  follows: 

1.  Net  wing  pivot  bending  moment  loads  spectra  including 
occurrences  representing  a  4000-hour  lifetime  are  input  as  loads 
libraries  in  terms  of  mean  and  alternating  loads. 

2.  The  loads  spectra  are  converted  into  corresponding 
mean  and  alternating  stress  spectra  by  using  the  appropriate 
unit  stress  coefficient  adjusted  to  include  Fxu  and  elevated 
temperature  corrections  as  required. 

3.  S-N  data  reflecting  the  range  of  stress  concentrations 
required  are  input  as  a  library. 

4.  Using  IBM  370  computer  procedure  TX3,  fatigue  damage 
(summation  of  n/N)  is  calculated  for  each  S-N  library  using  a 
range  (+10%  increments)  of  factors  on  the  unit  stress  coefficient. 

5.  The  resulting  damage  multiplied  by  an  S.F.  =  4.0 
may  be  plotted  to  achieve  two  purposes: 

(a)  Plot  damage  versus  stress  level  (limit,  ultimate  or 
maximum  spectrum  stress  level)  for  each  Kx,  enter 
the  curves  at  In/N  =  1.0  (failure  using  Miner’s 
rule),  and  determine  the  allowable  stress  levels. 

Holding  design  stresses  below  the  allowable  enables 
a  design  to  meet  the  fatigue  requirement.  Plotting 
the  allowable  stress  versus  Kx  yields  the  fatigue 
design  data  sheet. 
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(b)  The  damage  for  intermediate  K^'s  at  a  selected 

control  point  may  be  determined  by  cross  plotting 
the  damage  developed  for  available  S-N  data  reflecting 
other  Kx  values,  e.g.,  plot  the  damage  calculated  for 
Kt  =  2.0,  3.0,  and  4.0  to  allow  determination  of 
damage  at  3.4. 

The  baseline  pivot  bending  moment  spectra  is  presented  in 
paragraph  VI. 2,  and  the  unit  stress  concept  is  discussed  in 
paragraph  VI. 5. 

Corrections  to  account  for  the  difference  in  strength  of 
the  material  used  in  fabrication  and  of  the  material  used  in 
generating  S-N  data  (called  Ftu  corrections)  are  made  by 
ratioing  Ftu  values.  Corrections  to  account  for  the  reduction 
in  fatigue  data  due  to  elevated  temperature  are  made  by  ratio¬ 
ing  the  material  ultimate  strength  at  elevated  temperature  and 
at  room  temperature.  The  Ftu  correction  established  for  the 
baseline  2024-T851  aluminum  is  1.0144.  Elevated  structural 
temperatures  and  corresponding  corrections  established  for  the 
baseline  are  given  in  Table  XXIX.  Ftu  corrections  for  the  7000 
series  aluminum  alloys  and  the  8-8-2-3  titanium  alloy  were 
neglected  in  Phase  IA  due  to  the  preliminary  nature  of  the 
design  effort.  It  was  felt  that  8-8-2-3  titanium  would  experienc 
no  degradation  in  strength  at  the  baseline  temperature  of  255°F. 
This  was  substantiated  by  data  issued  bu  AFML  in  F33615-72-C- 
1280,  dated  March  1973,  which  indicated  no  difference  in  Kt  =  3 
S-N  data  generated  for  400°F  and  room  temperature.  The  only 
flight  condition  thought  to  affect  the  7000  series  aluminums 
was  Condition  9,  where  the  temperature  is  255°F.  The  total 
exposure  time  in  the  4000-hour  fatigue  spectrum  is  only  9.1 
hours;  however,  fatigue  analyses  using  S-N  data  for  these  alloys 
reflect  a  temperature  correction  for  this  condition  correspond¬ 
ing  to  a  20/o  strength  reduction.  This  was  substantiated  by 
tensile  strength  test  data  generated  for  7050-T73651  aluminum 
plate  where  the  average  Ftu  reduction  was  19%  after  exposure 
for  10  hours  at  270°F.  This  test  data  is  included  in  Appendix 
VIII  of  this  report. 

Because  sufficient  fatigue  S-N  data  was  not  available  for 
the  new  materials  being  evaluated  early  in  Phase  IA,  an  attempt 
was  made  to  assemble  data  which  was  available  and  representative 
of  the  actual  data  required.  This  representative  data  was  used 
to  prepare  initial  design  data  sheets  until  test  data  could  be 
generated.  The  S-N  data  shown  in  Figures  56  through  58  for 
7075-T6  aluminum  sheet  was  available  at  Convair  Aerospace  as 
computer  S-N  libraries.  This  data  is  from  NACA  TN3866  and  agrees 
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BASELINE  WING  ELEVATED  TEMPERATURE  CORRECTIONS 
FOR  FATIGUE  ANALYSIS 
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*Obtained  from  contractor  document  FZS-12-141,  "F-lll  Design  Allowables 
dated  1  August  1966. 


very  well  with  similar  data  in  M1L-HDBK-5A.  Using  adjustments 
based  on  a  ratio  of  Fxu  values,  this  data  was  used  to  simulate 
data  for  the  7475  and  7050  aluminum  alloys.  This  seemed  a 
reasonable  approach  based  on  some  limited  S-N  data  from  Alcoa 
for  7475  and  7050  for  Kx  =  1  and  Kx  =  3.0.  The  6A1-4V  annealed 
titanium  S-N  data  shown  in  Figures  59  through  61  was  also  avail¬ 
able  as  computer  libraries  and  was  used  to  represent  all 
titaniums  by  adjusting  stresses  with  a  ratio  of  ultimate 
strengths . 
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Figure  56  S-N  Curves  7075-T6  Aluminum  Sheet,  K-j  ■  2.0 
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Figure  57  S-N  Curves  7075-T6  Aluminum  Sheet,  I0r  =  3.0 
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Figure  58  S-N  Curves  7075-T6  Aluminum  Sheet,  Kt  =  4.0 
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Figure  59  S-N  Curves  6A1-4V  Titanium  Annealed  Plate,  Kt  -  2.0 
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Figure  60  S-N  Curves  6A1-4V  Titanium  Annealed  Plate,  K-j-  ■  3.0 
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Figure  61  S-N  Curves  6A1-4V  Titanium  Annealed  Plate,  Kj  =  4.0 


VI. 2  DESIGN  SERVICE  LOADS  SPECTRUM 

The  design  service  loads  spectrum  used  in  Phase  IA  was 
identical  to  the  baseline  fatigue  spectrum  with  one  exception. 

The  exception  is:  the  number  of  occurrences  were  revised  to 
reflect  the  more  severe  exceedance  data  and  ground- air- ground 
transition  requirements  included  in  MIL-A-8866A  (USAF) ,  dated 
31  March  1971.  (The  exceedance  data  used  in  developing  the 
baseline  spectrum  was  that  data  included  in  a  preliminary  version 
of  the  MIL-A-8866A  series  which  became  available  to  the  contractor 
in  early  1969.) 

In  regards  to  approach,  the  development  of  the  fatigue 
spectrum  was  based  on  a  mission  analysis  consistent  with  the 
requirements  of  MIL-A-8866A.  Tactical  Air  Command  planned 
utilization  for  the  baseline  aircraft  was  used  to  develop  29  mis¬ 
sion  profiles  and,  subsequently,  mission  segment  (flight  activity) 
distribution.  Consequently,  the  spectrum  is  a  realistic  interpre¬ 
tation  of  planned  usage  and  includes  all  significant  sources  of 
repeated  loads.  The  spectrum  is  referred  to  as  the  Mission  Analysis 
Composite  (MAC)  Spectrum;  its  development  is  described  in  detail 
in  contractor  document  FZM- 12-10783,  "F-lllA/E/D  Mission  Analysis 
to  Determine  Maneuver  Load  Factor  Exceedance  Spectra,"  dated 
27  June  1969.  The  Phase  I  and  II  training  profiles  are  also  included 
for  reference  in  the  baseline  document,  FZM-6100,  dated  12  April 
1973. 


Preliminary  fatigue  analyses  for  the  F-lll  Fatigue  Program 
were  performed  using  a  block  type  spectrum  consisting  of  approxi¬ 
mately  2000  individual  load  levels.  For  convenience  in  generating 
loads  spectra,  mission  profiles  were  resolved  into  23  usage  blocks 
by  categorizing  usage  time  according  to  discrete  mach-altitude-wing 
sweep  combinations  with  a  further  proration  of  time  within  each 
block  to  the  type  of  flight  activity  and  to  specific  gross  weight 
bands.  The  resulting  breakdown  of  a  typical  4000-  hour  service 
life  to  mach-altitude-wing  sweep-mission  segment  combinations  is 
shown  in  Table  XXX. 

The  F-lll  Recovery  Program  initiated  the  use  of  cyclic  flaw 
growth  analyses  for  establishing  fleet  inspection  intervals. 

Flaw  growth  would  ideally  be  calculated  for  every  load  level/ 
cycle  in  the  fatigue  design  load  spectrum.  Calculations  of 
this  nature  proved  impractical  in  terms  of  cost  and  time  even 
when  computers  were  utilized.  A  certain  amount  of  spectra 
simplification  was  required  to  expedite  flaw 
growth  analysis.  Simplification  was  attained  by 
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Table  XXX 

F-111F  PHASE  I  AND  II  TRAINING  USAGE 
BUILD  UP  OF  FLIGHT  HOURS  BY  MISSION  SEGMENT 
FOR  4000  HOUR  SERVICE  LIFE 
MISSION  SEGMgNf  I  TTft  ~ 
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and  "H"  in  TFR  denotes  Medium  ride  ana  Hard  ride. 


reducing  the  initial  23  usage  blocks  to  9  usage  blocks, 
primarily  by  lumping  altitudes  and  Mach  numbers.  All 
loads  were  developed  as  balanced  pitch  maneuver  loads. 

TFR,  take-off  and  landing  and  gust  loads  spectra  were 
included.  The  resulting  spectra  was  considerably  shortened 
while  still  representing  4000  hours  of  F-lll  usage  in  a 
conservative  manner.  Table  XXXI  summarizes  the  nine-block 
usage  breakdown.  The  spectra  was  arranged  in  200- hour 
blocks  and  then  randomly  ordered  using  a  random  generator 
program  available  for  use  with  the  in-house  computer. 

Fatigue  analyses  performed  with  the  simplified  spectrum 
produce  almost  identical  calculated  damage  compared  with 
that  calculated  for  the  original  2000  load  level  fatigue 
spectrum.  An  example  is  the  wing  pivot  fitting  fuel  flow 
hole  control  point  damage  summarized  below  for  a  Kp  «  4.6 
and  4000  hours  of  usage. 

o  7.33  g  Fatigue  Design  Spectrum  n/N  ■  0.325 

o  7.33  g  Simplified  Fatigue  Design  n/N  ■  0.316 

Spectrum 

During  the  F-lll  Recovery  Program,  a  flight-by- flight 
spectrum  was  developed  to  determine  the  effects  of  this  type 
of  spectrum  ordering  on  flaw  growth.  Both  the  flight-by 
flight  and  the  simplified  block  type  spectra  were  redeveloped 
to  reflect  the  more  severe  N?  exceedance  data  in  MIL-A-8866A 
for  use  in  the  ADP  Fighter  Wing  Program.  The  flight  by 
flight  spectrum  will  be  used  almost  exclusively  in  the  follow  on. 

Fatigue  analyses  have  been  generated  to  illustrate  the  rela¬ 
tively  good  agreement  in  calculated  fatigue  damage  when  using 
the  flight-by- flight  or  block  spectrum  approach.  Typical 
results  of  this  comparison  are  shown  below  for  2024- T851 
aluminum  S/N  data  and  4000  hours  of  baseline  usage  including 
a  scatter  factor  of  4.0.  The  maximum  spectrum  stress  used  to 
make  this  comparison  was  26.7  ksi. 


SPECTRUM 

Summation 

of  n/N 

Kp  »  3.0  Kp 

-  4.0 

Kp  -  5.0 

FLT  x  FLT 

0.2284 

0.7424 

;.9360 

Random  Block 

0.2580 

0.7920 

0.9580 
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Comparisons  showing  the  agreement  between  the  spectra 
approaches  on  a  flaw  growth  basis  are  presented  in  paragraph 
7.2.1  of  this  report. 

The  good  agreement  obtained  from  comparisons  of  flight- 
by- flight  versus  block  spectra  has  substantiated  the  use 
of  the  block  spectrum  approach  for  performing  fatigue  and 
flaw  growth  analyses  in  Phase  IA.  The  wing  pivot  bending 
moment  spectrum  utilized  in  Phase  IA  is  tabulated  for 
reference  in  Tables  XXXII  through  XXXVIII. 
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Table  XXXII 

SPECTRUM  OF  OCCURRENCES  OF  POSITIVE  NORMAL  LOAD  FACTOR 
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Table  XXXIII 

F-111A  WING  PIVOT  BENDING  MOMENT  CYCLIC  MEANS  &  AMPS 
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Table  XXXIV 

SPECTRUM  OF  OCCURRENCES  OF  NEGATIVE  NORMAL  LOAD  FACTOR 
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Table  XXXV 

F-111A  WING  PIVOT  BENDING  MOMENT  CYCLIC  MEANS  &  AMPS 
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Table  XXXVI 

TFR  SPECTRUM  OF  WING  PIVOT  BENDING  MOMENT 


Table  XXXVII 

TAKEOFF  &  LANDING  SPECTRUM  OF  WING  PIVOT  BENDING  MOMENT 

NORMAL  LOAD  FACTOR 
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Table  XXXVIII 

GROUND -AIR-GROUND  SPECTRUM  OF  WING  PIVOT 
BENDING  MOMENT 


VI. 3  DEEP  FLAW  MAGNIFICATION  FACTOR  (Mr)  EFFECTS 


Calculations  of  critical  flaw  size  (ac)  for  part-through 
surface  flaws  include  a  deep  flaw  magnification  factor,  Mk> 
sometimes  called  the  back  face  correction  factor.  The  purpose 
of  the  Mk  term  is  to  account  for  the  accelerated  growth  of  a 
deep,  part-through  surface  flaw  as  it  approaches  the  back  face 
of  a  finite  thickness  (t)  sheet  or  plate.  As  with  some  other 
correction  factors,  several  variations  are  available.  The  Mk 
factors  used  in  this  report  are  those  found  in  the  AFFDL  "CRACKS" 
computer  program  listing.  The  value  of  Mk  in  this  listing  ranges 
from  1.0  at  (a/t)  -  0  to  1.10  at  (a/t)  -  1.0  for  a  flaw  with 
a/2c  =  0.5.  Another  Mk  curve  which  has  been  used  at  Convair 
Aerospace  is  based  on  Boeing  data.  Its  value  ranges  from  1.0 
at  (a/t)  =  0  to  1.46  at  (a/t)  =  1.0.  The  original  Boeing  curve 
has  been  somewhat  simplified  to  facilitate  use  in  a  digital  com¬ 
puter.  See  Figure  62  for  comparison  of  the  curves.  As  can  be 
seen,  only  minor  variation  exists  in  the  range  of  (a/t)  from  0 
to  0.9.  It  is  in  the  0.9  to  1.0  range  that  significant  differences 
occur.  The  primary  reason  for  the  rapid  increase  in  the  Convair 
Mk  curve  between  0.9  and  1.0  is  to  provide  compatibility  at  the 
back  face  between  critical  flaw  sizes  (ac)  computed  as  part- 
through  cracks  and  critical  flaw  sizes  (2cc)  computed  as  through 
cracks.  The  Mk  =  1.46  accomplishes  this  goal  for  a/2c  =  0.5. 

Figure  63  displays  the  through  and  part-through  critical  flaw 
sizes  for  2024-T851  plate,  a y  =  57  ksi,  t  =  0.611  in.,  a/2c  =  0.5, 
and  Kjc  =  28  ks i^/in .  for  a  range  of  stress  from  16  to  36  ksi.  The 
discontinuity  in  the  curve  using  the  AFFDL  Mk  is  apparent  compared 
to  the  relatively  smooth  transition  from  part-through  to  through 
flaw  using  the  Convair  Mk*  The  Convair  Mk  curve  yields  smaller 
critical  flaw  sizes  in  the  range  of  (a/t)  from  0.9  to  1.0  and 
consequently  predicts  shorter  (more  conservative)  times  to  unstable 
crack  growth.  The  stress  intensity  equation  used  to  calculate 
part-through  critical  flaw  size  (ac)  is  also  used  to  calculate 
dK  for  use  in  flaw  growth  equations.  Here  again  the  Convair  Mk 
curve  provides  a  measure  of  conservatism  by  yielding  higher  d  K 
values  in  the  (a/t)  range  of  0.9  to  1.0  and  consequently,  slightly 
faster  calculated  flaw  growth  rates.  See  Figure  64  for  a  typical 
case . 


The  unreasonable  feature  connected  with  using  the  AFFDL  Mj^ 
curve  is  that  for  a  large  range  of  stresses,  i.e.,  19.6  to  26.0 
ksi  in  Figure  63,  the  critical  crack  size  is  a  constant  value 
while  the  basic  stress  intensity  relationship  indicates  that  the 
flaw  size  should  vary  with  the  square  of  the  stress. 
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Comparison  of  Deep  Flaw  Magnification  Factors  (M^) 
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Figure  63  Comparison  of  Critical  Flaw  Sizes 
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Because  of  the  abo\e  considerations,  it  is  therefore 
recommended  that  the  Convair  M^  curve  be  used  in  the  follow- 
on  detail  design  effort. 


VI. 4  COMPARISON  OF  CRACKS  AND  TD9  FLAW  GROWTH 
COMPUTER  PROGRAMS 


Flaw  growth  calculations  in  Phase  IA  were  made  using  an 
IBM  370  computer  program  identified  as  TD9 .  This  program  pro¬ 
duces  results  that  are  essentially  identical  to  those  produced 
by  the  AFFDL-TR-70-107  CRACKS  program.  TD9  was  used  because  it 
has  been  found  to  be  faster.  The  difference  in  run  time  seems 
to  result  from  the  relatively  slow  Runge  Kutta  integration 
procedure  used  in  CRACKS.  Although  some  form  of  numerical 
integration  is  the  more  exact  method  of  summing  the  calculated 
crack  growth  increments,  extensive  studies  have  shown  that 
approximation  techniques  can  be  used  which  produce  slightly 
conservative  but  more  rapid  results.  TD9  utilizes  such  an 
approximation  technique.  A  copy  of  the  TD9  program  listing  and 
customer  instructions  are  provided  for  information  in  pages  164 
through  214.  If  desired,  the  program  will  be  made  compatible 
for  customer  use  in  the  follow-on.  A  card  deck  for  the  TD9  pro¬ 
gram  has  already  been  supplied  to  AFFDL  under  separate  cover 
at  their  request. 

A  flight-by-flight  spectrum  flaw  growth  calculation 
comparison  was  made  using  TD9  and  a  version  of  CRACKS  available 
at  Convair  Aerospace  on  the  CDC  6600  which  includes  the  Wheeler 
retardation  procedure.  The  runs  were  compared  for  a  part- 
through  surface  cracks  in  the  baseline  (2024-T851  aluminum) 
lower  wing  skin.  Results  are  shown  in  Table  XXXIX.  To  conserve 
computer  time,  the  comparative  runs  were  terminated  after  10,000 
flight  hours.  The  initial  crack  size  was  0.075  inches  by  0.150 
inches . 

The  run  times  as  charged,  using  Convair  Aerospace  user 
charge  rates,  was  one  minute  for  TD9  and  7.5  minutes  for  CRACKS. 
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Table  XXXIX 

CRACK  GROWTH  COMPARISON 
CRACKS  VS.  TD9 
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TD9  COMPUTER  PROGRAM  LISTING 
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20 


30 
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CGMMON  SMININI  1000) ,SMAX INI  1000) ,CYCIN(  1000)  ,C0N0(1000) , I NDEX ( 10) ,TR9000i 
1SMULT ( 10) ,NLARS ( 10) ,SM1N( 1000 ) , SMAXl 1000) ,CYC (1000) ,0£LS( 1000) f  TWQTR90002 
2A( 10 ) i T ABA( 3000, 14), T ABB ( 14 , 6 ) , MO VE R, NC ONO, MSE T S , XC YC , T , AOB , FYS , KCTR90003 
3,KIC,SF,PHISQ,EXM(14) ,NTWOA , JCN T, ALFA ,C , J , I  PA SS , CRACK .DEL K, SRAT 10 , TR90004 
4WI0TH,B0T,ETA,DADN, IC HK , L 10 ,K EY 1 , KE Y2 ,KEY3 , KE Y4 ,KE Y5 , KE Y6 , KEY7 , K12 TR90005 
COMMON  K13, K17, I S EG ( 1000) ,R ATEN ( 1000) ,AM( 11 ) ,HUM, K14 , Kl 5, IPROB,RR( TR90006 
11000) ,K8,K9,K16,DEK ( 10,20) ,DEDN( 10,20) , MOi ,M02, M03 , M04 , MO 5 , M06 , M07TR90007 
2, M08, M09, MD( 10 ) , I MD ,NRT D, DDOA ,DUM1 , E 1 , ARY1 ,DUM3 , ARY2 , AK1 , RY l , RY2 , KTR90008 
3A9,KEY,K10,0RY,WET, JWO.KCC, INDX , I C YC, I T WOA.C YCTO, TI MTO , I  NX , AREF ,GMT R90009 
4AX,GMIN,PTITLE(  3, 16 ) , IT  I TLE ( 2 , 16) , L JOB, LDECK , I  JOB , I  DECK ,K 1 1 , 1  ERR, I TR900 10 
5S< l2),SrMAX,STMIN,NR0,NSTCDS,XFACT,I0(1000)  , NA  TR90011 

0  I  MENS  I  ON  CLS ( 3000)  TR90012 

DIMENSION  NSEGI 3 ) , DACON ( 3, 3 ) , DSLOPE ( 3 ,3 ) , DKMAX( 3 , 3 ) ,RVAL( 3) ,DADNIDTR90013 


1(  10) 

THIS  IS  THE  MAIN  PROGRAM.  IT'S  USE  REQUIRES  THE  SUBROUTINES 
SEQUENCE, DELTAK,  CRATE,  AFIT,  COMPKL,  OUTPUT,  RPLAST ,  CRKGRO, 
FINLDS,  AND  RLUADS. 

REAL  KC , K I C 
INTEGER  SF 

CALL  GSTART  (3HTR9  , MOVER) 

REWIND  9 

GO  TO  ( 10,30),  MOVER 
CALL  LIB 

THE  FIRST  CARD  OF  EACH  CECK  IS  READ  AND  CHECKED  TO  IDENTIFY 
DECK  AS  PROBLEM  OR  LIBRARY  INPUT.  IF  THE  OECK  IS  A  LIBRARY 
DECK  RLOADS  IS  CALLED  AND  THE  DATA  IN  THE  DECK  IS  STORED  ON 
DISK  UNIT  9.  IF  THE  DECK  IS  A  PROBLEM  OECK  ALL  PROBLEM  DATA 
IS  READ  IN. 

READ  (5,1290)  ( PT I TLE ( 1 , I ) , 1= 1 , 16  ) 

CALL  STATUS  (IS) 

WRITE  (6,990)  IS(2),IS(3) 

IF  <  I S ( 2) .EQ.2)  GO  TO  20 

CALL  RLOADS 

GO  TO  10 

END  FILF  9 

BACKSPACE  5 

ALF  A=3.  14159265/2.0 

C=l .0/1.21 

CALL  PROB 

REWIND  9 

THREE  CARDS  ARE  READ  CONTAINING  PROBLEM  IDENTIFICATION.  COLUMNS 
1-60  OF  THESE  CAROS  CAN  BE  USED  AS  CUSTOMER  CHOOSES. 

READ  (5,1290)  ( ( P T  I  TL E (  I  , K )  ,K  =  1 , 16 ) , I  =  1 , 3 ) 

CALL  STATUS  ( IS ) 

KHR=IS(8)/360000. 

ISM=IS(8)-(KHR*J60000.) 

KMN= ISM/6000. 

SEC= (  ISM-(KMN*600C. ) ) /100. 

THE  FOLLOWING  OPTION  CARD  PERMITS  THE  USER  TO  (1)  EITHER 
HAVE  A  FINITE  WIDTH  PLATE  (KEY1=0)  OR  AN  INFINITE  PLATE 


TR90014 

TR90015 

TR90016 

TR90017 

TR90018 

TR90019 

TR90020 

T  R9002 1 

TR90022 

TR90023 

TR90024 

TR90025 

TR90026 

TR90027 

TR90028 

TR90029 

TR90030 

TR90031 

TR90032 

TR90033 

TR90034 

TR90035 

TR90036 

TR90037 

TR90038 

TR90039 

TR90040 

T  R9004 1 

T  R90042 

TR90043 

TR90044 

TR90045 

TK90046 

TR90047 

TR90048 

TR90049 

TR90050 

TR90051 

TR90052 

TR90053 

TR90054 

TR90055 

TR90056 
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ooooooooonoooooooooo 


c 

c 


c 


c 


c 

c 

c 

c 


c 

c 

c 

c 

c 


GROWTH  FOR 
VARIABLE 

VALUES  (KEY6=1) ,0R 
5  LAB  AIR  AND/OR  JP4 


(KEY1=1),  (2)  EITHER  INPUT  UP  TO  10  INITIAL  CRACK  LENGTHS 
( KEY2=0 )  OR  HAVE  SUBROUTINE  CHOOSE  00  IT  (KEY2=l),  (3) 

INTERPRET  LIBRARY  DATA  AS  EITHER  MEAN  ANO  ALTERNATING 
STRESSES  (KEY3=1>  OR  MINIMUM  AND  MAXIMUM  STRESSES  (KEY3=0>, 

(41  CHOOSE  ONE  OF  SEVERAL  SEQUENCING  OPERATIONS  TO  BE 
PERFORMED  ON  THE  SPECTRUM  ( KE Y4=0 , 1 , 2 , 3 )  ,  (5)  EITHER 
WRITE  (6,980)  KHR ,KMN , SEC 

PRINT  ( KEY5=0)  OR  SKIP  (KEY5=l)  THE  CRACK 
INDIVIDUAL  LAYERS  ON  EACH  PASS,  (6)  USE  A 
CORRECTION  FACTOR  M  (KEY6=0),0R  READ  IN  M 
BOEING  M  VALUES  FOR  A/2C=.5  USED  (KEY6=2) 

( KEY 7=0 ) , OR  HIGH  HUMIDITY  AND/OR  JP4  <KEY7=1),0R  LAB  AIR  AND/OR 
DISTILLED  WATER  ( KE  Y7=2 ) , OR  HIGH  HUMIDITY  AND/OR  DISTILLED  WATER 
( KE Y 7=  3 ) ;  ONE  ENVIRONMENT  WILL  BE  USED  (K8=0) , PERCENTAGES  OF  WET 
AND  DRY  ENVIRONMENT  DATA  USED  (K8=I),  PERCENTAGES  OF  WET, DRY, AND 
HUMIDITY  DATA  USED  (K8=2>;  DADN  VS  DELTAK  DATA  TO  BE 
READ  IN  FOR  3  STRESS  RATIOS  ANO  3  CYCLIC  RATES  (9  SETS) 

(K9=2)  OR  DADN  VS  DELTAK  DATA  READ  IN  FOR  3  STRESS  RATIOS  OF 
DRY  DATA  (K9=l),0R  HUMIDITY  DATA  USED  (K9=3),  OR  JP4  OR  DISTILLED 
WATER  HUMIDITY  DATA  USED  (K9=4);  DATA  WILL  BE  READ 
READ  FOR  CRACK  IN  I  AT  I NG  IN  A  HOLE  (K10=l)  OR  NORMAL  PROCEDURE 
FOR  CRACK  IN  A  PLATE  (K10=0),  STRESS  GR  AD  I  ANT  WILL  BE  USED  FOR 
STRESS  VARRYING  WITH  CRACK  DfcPTH(Kll=i)  OR  CONSTANT  STRESS 
ARE  REPEATED  YY  TIMES  EACH  PASS  (K12=l),  LOADS  SPECTUM  USED  AS 
ENTERED  (K12=0);  PRINTED  OUTPUT  (K13=1>,  MICROFILM  OUTPUT  (K13=2) 
PRINTED  ANO  MICROFILM  OUTPUT  (K 13=3 ) 5  THE  LAST  PORTION  OF  LOADS 
SPECTRUM  IS  DIVIDED  SUCH  THAT  SOME  LOAD  ARE  USED  IN  PASS  l  OTHERS 
IN  PASS  2  ETC.  THRU  PASS  4, THEN  PASS  5  IS  SAME  AS  1  (Kl4=i), 
SPECTRUM  USED  AS  INPUT  (K14=0)J  PLOTTED  OUTPUT  GIVEN  (KI5=1), 
APPLIED  I K 1 1  =  0 )  ;  THE  FIRST  XX  LOAD  LEVELS  IN  THE  LOADS  SPECTRUM 
NO  PLJTTED  OUTPUT  ( K 1 5= 0 ) . 


READ  (5,1010)  KEYI,KEY2»KEY3»KEY4,KEY5»KEY6,KEY7,K8»K9»KI0,K1I,K1 
1,K13,K14,  KI5,K16,K17,KI8 
IF  (K13.LT. 1.0R.K13.GT.3)  K13=l 
CALL  XCOPY  ( K 13 ) 

WRITE  (6,  1000)  ( ( PT  ITLE ( I ,K ) , K= 1 , 16) , 1  =  1,3) 

K A9=K9 

IF  (K9.EQ.0)  K A  9=  3 

THE  JOB  AND  DECK  NUMBER  OF  LIBRARY  TO  BE  USED  ,  THICKNESS, 

WIDTH,  STRESS  MAX  AND  MIN  FACTORSITO  BE  USED  WITH  STRESS  GR  AD  I  ANT 
ARE  ENTERED  ON  NEXT  CARD 

READ  (5,1100)  LJ0B,LDECK,T,TW0A(1),STMAX,STMIN, WIDTH 
IF  (Kll.EQ.  1. AND. STMAX.LT. 0.001 )  GO  TO  250 

A/8  RATIO  ,  PHI  SQUARED,  DRY  AND  WET  FACTORS! TO  BE  USED  WHEN 
ENVIRNMENT  VARRIES),  El  (RETARDATION  EXPONENT),  AND  NRTD  ( NRTD=2 
FOR  BOTH  RETARDED  AND  NON  RETARDED  ,  NR  TD  =  l  FOR  NON  RETARDED,  AND 
NRTD  =0  FOR  RETARDED)  ARE  ENTEREO  ON  NEXT  CARD 
READ  (  5,1070)  AOB , PHI SQ ,DRY , WE T  ,HUM , NRD 

IF  (K8.EQ.1. AND.DRY.LT. 0.001)  GO  TO  260 

TENSILE  YIELD  STRENGTH,  KC,  KIC,  AND  THRESHOLD  VALUES  ARE  INPUT 

READ  (5,1020)  F YS ,KC, K IC , C YC TO, T I MTD, BL K 

NEXT  READ  A  CYCLIC  MULTIPLIER  AND  THE  NUMBER  OF  PASSES 


TR90057 
TR9U058 
TR90059 
TR9006U 
TR90061 
TR90062 
T  R90063 
TR90U64 
T  R900o5 
TR90066 
T  R9006  7 
T  R9006 
TR9006Y 
TR90070 
TR9007 1 
TR90072 
TR90073 
TR90074 
TR90075 
TR90076 
TR90077 
TR90078 
TR90079 
TR90080 
, TR90081 
TR90082 
TR90083 
TR90084 
TR90085 
TR90086 
TR900B7 
TR90088 
2TR90089 
TR90090 
T  R9009 1 
TR90092 
TK9009J 
T  RV0094 
TR90095 
TR90096 
TR900  9  7 
) TR90098 
TR90099 
TR90100 
TR90101 
TR90102 
TR90103 
TR90104 
TR90105 
TR9010O 
TR901U  7 
TR90108 
TR90109 
TR901 10 
TR901 11 
TR901 12 
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c 

c 

c 

c 


c 


c 


40 

50 

60 


70 

80 


C 

C 

C 


READ  (5,1050)  XC YC , SF ,L I 0 , I PROS , M2 f M3 , M4 , RE S I 01 , RE S 1 02 , 

JOB 

TR901 13 

T  R901 14 

THE  NUMBER  (NTWOA)  ANO  VALUES  (TWOA(I))  OF  THE  INITIAL 

rR901l5 

CRACK  LENGTHS  ARE  NOW  READ. 

TR901 16 
TR90117 

JOF= 100 

TR90118 

TR90119 

TR90120 

THE  NUMBER  OF  SPECTRUM  MULTIPLIER  SETS  IS  READ  IN 

TR90121 

TR90122 

READ  (5,1030)  MSETS,  NPAS,  ILR,  DIA,  FACDA  ,  FMAX 

TR90123 

IF  (FMAX. LE. 1.0)  FMAX=3.4 

T  R9012J 1 

IF  (FACDA.LT. 0.01)  FACDA=  1.0 

TR90124 

T  R90125 

IF  (KEY2.EQ.1)  READ  (5,1060)  SMAX( 1000) 

TR90126 

IF  (K9.NE.2)  GO  TO  80 

TR90127 

READ  IN  DA/UN  VS  DELTA  K  CURVES  FOR  MULTIPLE  R  VALUES 

TR90128 

READ  (5,1080)  MD1 ,M02 ,MD3 ,MD4 ,MD5 , MD6 ,MD7 ,MD8 ,MD9 

TR90129 

READ  (5,1090)  (  ( DEDN( I , M ) ,M  =  i , 10)  , ( DEK(  I , M)  , M=1  , 10 ) , I  =  1 

t9) 

TR90130 

MD ( 1 ) =MD 1 

TR90131 

MD ( 2 ) =MD2 

TR90132 

MD ( 3 ) =MD3 

TR901 33 

MD ( 4 ) =  MD4 

TR90134 

MD ( 5 ) =MD5 

TR90135 

MD ( 6 ) =  MD6 

TR90136 

MD( 7 ) =MD7 

TR90137 

MD ( 8 ) =MD8 

TR90138 

MD ( 9 )  =  MD9 

TR90139 

DO  50  1=1,9 

TR90140 

M  =  MD(  I  ) 

TR90141 

DO  40  MT=2,M 

TR90142 

M1=MT-1 

TR90143 

IF  ( DEDN ( I, Ml) .GE.DEDN( I , MT ) . OR . DEK ( I , M 1 ) .GE . DE K( I , MT ) ) 

GO  TO  60 

TR90144 

CONTINUE 

TR90145 

CONTINUE 

TR90146 

CO  TO  70 

TR90147 

WRITE  (6,880)  I,M1,MT 

TR90148 

CALL  ERROR  (242) 

TR90149 

GO  TO  30 

TR90150 

CONT INUE 

TR90151 

CCNTINUE 

TR90152 

I  NDX  =  0 

TR90153 

DUM3=i.0/(6.0*3.1416*FYS*FYS) 

TR90154 

IF  (K18.EQ.1)  DUM  3  =DUM3  *3. 

TR90155 

GM I N= 1 • 0 

TR90156 

GM AX= 1.0 

TR90157 

AREF= 1 • 0 

TR90158 

KDUM=  2 

TR90159 

NSTCDS= 1 

TR9016 0 

READ  GM AX , GM I N, AND  AREF  FOR  CRACK  IN  A  HQLE(K10=1) 

TR90161 

IF  (K10.E0.1)  READ  (5,1020)  GMAX, GM IN , AREF 

TR90162 

CALL  FINLDS  AND  READ  THE  APPROPRIATE  LOADS  LIBRARY  FROM 

DISK 

TR90163 

UNIT  9  INTO  CURE  STORAGE 

TR90164 

CALL  FINLDS 

TR90165 

IF  (  IERR.EQ.O)  GO  TO  90 

TR90166 

WRITE  (6,960)  I  ERR 

TR90167 
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90 


CALL  SKIPPR  T  R90 1 68 

GO  TO  30  TR90169 

CONTINUE  TR90170 

WRITE  PROBLEM  INPUT  TR90171 

(6,  1000)  ( (LT  ITLE ( I »K  )  , K= 1 , 16 ) • I = 1 • 2)  TR90172 

(6, 8201  KEYi, KEY2,KEY3, KEY4,KEY5, KEY6fKEY7,K8,K9,K10*Kllf K12TR90173 


WRITE 
WRITE 
1 ,  K~1  3 , 


100 

110 


K14»K15fK16fK17fK18 
IF  (KEYl.EQ.O)  GO  TO  100 
WRITE  ( 69 1270 )  T 
GO  TO  110 

WRITE  ( 6  9  12  80)  T,WIOTH 

WRITE  ( 6« 1130)  A0B9PHISQ9FYSfKC9KIC»CYCTD9TIMTD9SF f JCNT 
WRITE  (6983O)  LJOB,LDECK, STMAXf STMI N,OR Y, WE T, NROf XCYC ,MSE TS 
IF  (K8.EQ.2)  WRITE  (698IO)  HUM 
WRITE  (69  840 )  R ES 1 0 1 9  RE S I  02 9 T WOA (  1) 

IF  (K10.EQ.2)  WRITE  (6f1450)  DIA 


1350) 


WR1 

[TE 

(6. 

1460)  FACDA 

WRITE 

(6, 

1340) 

IF 

(KA9.EQ.5)  GO  TO  8 

8 

IF 

<K8 

.NE 

.0.0R.K9.EQ. 

1) 

WRITE  (6, 

IF 

IK8 

.EQ 

•0.AND.K9.EQ 

.1) 

GO 

TO  1 

IF 

(K8 

.EQ 

•0.AN0.KA9.EQ.3 

)  GO 

TO  l 

IF 

(  K8 

.LE 

.1>  GO  TO  11 

1 

1  12 

IF 

(KEY  7. 

EQ.0.0R.KEY7 

.EQ 

.2) 

WRI  TE 

IF 

( KEY  7. 

E0.1.0R.KEY7 

.EQ 

.3) 

WRITE 

IF 

( K8 

.EQ 

.0)  GO  TO  114 

111 

IF 

( K9 

.EQ 

.2)  GO  TO  11 

3 

IF 

(KEY7. 

LE.l)  WRITE 

(6, 

940) 

IF 

( KEY7. 

GE.2)  WRITE 

(6, 

9  50) 

GO 

TO 

114 

(6V1320) 
( 6, 1330) 


IP  F  ,  NRC  t ( DA  ON  ID ( I )  9  I =1 9 1 0 ) 9 ( NSEG4 K ) , K= 1 , NRC ) 

( D ACON ( I 9  J ) 9  0 SLOPE ( I fJ) 9  OKMA X ( I , J)  ,  J=l,3)  ,  R VAL ( I ) 


WRITE 

WRITE 


(69 1420) 
(69 1430) 


(DADNIDU  ),I=1,10 
(OAONIOd  )f  I  =  1 9 10 


(DACON( I , J ) 9DSLOPE ( I , J) ,OKMAX( I , J)  #  RVAL (I  ) 9  J  =  1 , K ) 


88  RE AO  (5.1400) 

DO  82  1=1, NRC 
READ  (5,1410) 

82  CONTINUE 

IF  (IPF.EU.O) 

IF  (IPF.EQ.l) 

DO  84  1=1, NRC 
K=NSEG( I ) 

WRITE  (6,1440) 

84  CONTINUE 

GO  TO  114 

113  WRITE  (6,1360) 

114  CONTINUE 

IF  (KEY2.EQ.1)  WRITE  (6,870)  SMAX(IOOO) 

IF  (K12.EQ.1)  WRITE  (6,970)  NPAS.ILR 
IF  (  K  9  .  EQ  •  2  )  WRITE  (6,850  )  MO  1 , MD2 , MO 3 , M04 , M05 , MD6 , M07 9  MO 8 , M09 , ( ( 0TR90213 
1FDN(  I ,M) ,M=1, 10) ,  (DEM  I , M ) , M= 1 , 10),  1=1,9)  TR90214 

IF  (KiO.EQ.l)  WRITE  (6,860)  GMA X , GM I N , AREF  TR90215 

IF  (K10.EQ. 1. AND.GMAX.LT. 0.001)  GO  TO  270  FR9021o 

JCNT=0  TR90217 

DO  130  I=1,NC0ND  TR90218 

INDEX ( 1 )=JCNT+NLARS ( I )  rR90219 

JCNT  = I NDE  X (  I )  TR90220 

130  CONTINUE  TR90221 

IF  (KEY6.NE.1)  GO  TO  140  TR90222 

READ  BOEING  MK  DATA  WHEN  (KEY6=1)  TR9022J 


TR90174 

TR90175 

TR9017O 

TR90177 

TR90178 

TR901 79 

TR90130 

TR90181 

TR90162 

TR90183 

TR90184 

T  R901 85 

TR90186 

TR90187 

TR90188 

TR90189 

TR90190 

TR90191 

TR90192 

TR90193 

TR90194 

TR90195 

TR90196 

TR90197 

TR90198 

TR90199 

TR90200 

TR90201 

TR90202 

TR90203 

TR90204 

T  K902  05 

TR9020o 

TR90207 

I R90208 

T  R 9 02 09 

TR90210 

TR90211 

TR90212 
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READ  (5,1110)  (  AM  (  M  )  ,  M=  1 ,  1 1  ) 

IF  (KEY6.EQ.1.AN0.AM( 1).LT. 0.001)  GO  TO  280 
WRITE  (6,1120)  ( AM( M ) ,M=i ,11) 

140  CONTINUE 

READ  (5,1040)  (SMULT(M)  ,M=1  ,10) ,E1,KR1, KR2 
READ  (5,1310)  (EXM(M) ,M=i,MSETS) 

NRT  D=NRD 

DO  780  NSTCDS  =1,  MSETS 
L  =  0 
K  A=  1 

IF  (K16.EQ.0. AND. NSTCDS. GT. 1)  GO  TO  408 
IF  (K16.EQ.0)  GO  TO  142 
L=  NSTCDS 
KB= JCNT 
GO  TO  143 

142  L  =  L  ♦  1 

KB= I NDEX ( L ) 

143  CONTINUE 

DO  150  M=KA , KB 
CYC(M)=CYCIN(M)*XCYC 
SM I N ( M ) = ( SMININ(M)*SMULT(L) )«-RESIDl 
SMAX(M)=SMAXIN( M) ♦SMULT ( L ) 

IF  (KEY3.EU.0)  SM AX ( M )  = SMAX ( M ) *RE SI D1 
I Q ( M ) =L 

150  CONTINUE 
KA=KB+  1 

IF  (K16.EQ.0. AND.L.LT.NCOND)  GO  TO  142 

f 

IN  THE  NEXT  LOOP,  ALTERNATING  AND  MEAN  STRESSES  ARE 
CONVERTED  TO  MAXIMUM  AND  MINIMUM  STRESSES  WHERE  ON  INPUT 
THE  MINIMUM  AND  MEAN  ARE  SYNONYMOUS  AS  ARE  MAXIMUM  AND 
ALTERNATING. 

C 

IF  (Kll.EQ.  1. AND. NSTCDS. GT. 1)  GO  TO  180 
IF  ( KEY  3. EQ. 0 )  GO  TO  180 
DO  170  KK  = 1 , JCN T 
D'JM  1=SMIN(KK) 

DUM2=SMAX (KK) 

SMIN( KK )=DUM1-DUM2 
SMAX ( KK )  =  DUM 1+DUM2 
170  CONTINUE 
180  CONTINUE 

C  LOOP  220  PERMITS  ONLY  POSITIVE  SPECTRUM  STRESSES,  INITIAL 

C  IAL  CYCLE  COUNTER,  CALCULATES  STRESS  RATIO  AND  DELTA  STRE 

C  ETS  SMININ  AND  SMAXIN  FOR  STRESS  GRADIENT  CASE. 

DO  220  KK  =  1 , JCNT 

CLS(KK)  =0.001 

C  LS ( KK  + JCNT )  =0.001 

CLS(KK+JCNT*JCNT)  =0.001 

IF  (SMAX(KK).GE.SMIN(KK) )  GO  TO  190 

DUM2=SMAX (KK) 

SMAX(KKI=SMIN(KK) 

SM I N ( KK )  =  DUM2 
190  CONTINUE 

IF  (SMIN(KK).LT.O.)  SMIN(KK)=0.0 
IF  (SMAX(KK).LT.O.)  SMAX(KK)=0.0 


TR90224 
TR90225 
TR90226 
TR90227 
TR90228 
TR90229 
TR90230 
TR90231 
TR90232 
TR90233 
TR90234 
TR90235 
TR90236 
TR90237 
TR90238 
TR90239 
TR90240 
TR90241 
TR90242 
TR90243 
TR90244 
TR90245 
TR90246 
TR90247 
TR90246 
TR90249 
TR90250 
TR90251 
T  R90252 
TR90253 
TR90254 
TR90255 
TR90256 
TR90257 
TR90258 
TR90259 
TR90260 
TR90261 
TR90262 
TK90263 
TR90264 
TR90265 
IZES  PART TR902o6 
SS,  AND  STR90267 
TR90268 
TR90269 
TR90270 
TR90271 
TR90272 
TR90273 
TR90274 
TR90275 
TR90276 
TR90277 
TR90278 
TR90279 
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IF  (Kll.EU.O. OR. NSTCDS. GT.l)  GO  TO  200 
SMININIKK )=SMIN(KK ) 

SMAXIN(KK)=SMAX(KK) 

200  CONTINUE 

DELS (KK )  =  SMAX(KK )-SMIN(KK  ) 

C  COMPUTE  R  VALUE 

IF  (SMAXIKK )  .EQ.O.O)  GO  TO  210 
RR(KK)=SMIN(KK)/SMAX(KK ) 

GO  TO  220 
210  RR ( KK ) = 1 . 0 

220  CONTINUE 
C 

C  KEY4  IS  NOW  TESTED  TO  DETERMINE  THE  MANNER  IN  WHICH 

C  THE  SPECTRUM  WILL  BE  ARRANGED.  BUT  FIRST,  THE  ARRAY 

OELS  MUST  BE  GENERATED  BECAUSE  IT  WILL  BE  USED  IN  ANY 

C  SEQUENCING  OPERATION. 

C 

IF  (KFY4.EQ. 1.0R.KEY4.EQ.2)  CALL  SEQENC 
IF  (NSTCDS.GT .1.AN0.K16.NE.0)  GO  TO  225 
IF  IKEY4.EQ.3.0R.KEY4.EQ.4)  CALL  RANGEN  I KRI ,KR2) 

225  CONTINUE 

C 

C 

C  FOR  INFORMATIVE  PURPOSES,  THE  MULTIPLIERS  OF  THE  CYCLES 

C  AND  THE  CONDITIONS  ARE  NOW  PRINTED.  ALSO  PRINTED  ARE  THE 

C  ARRAYS  COND,  SMININ,  SMAXIN,  CYCIN,  SMIN,  SMAX,  CYC,  AND 

C  DELS. 

C 

IF  (NSTCDS.NE.I.AND.K16.EQ.0)  GO  TO  400 
WRITE  16,1250)  XCYC 

IF  (KEY4.EQ.3.0R.KEY4.EQ.4)  WRITE  (6,1300)  KRI, KR2 
WRITE  (6,1260) 

JKL  A=  1 

DO  230  JKL= 1 , NCUNO 

IF  (K16.EQ.0)  WRITE  (6,1230)  CONDUKLA),  SMULT(JKL) 

IF  (K16.NE.0)  WRITE  (6,1230)  CONDIJKLA) ,  SMUL T( NSTCDS ) 
JKLA=lMNOEX(JKL) 

230  CONTINUE 
GO  TO  300 
240  CALL  SKIP  PR 
GO  TO  30 

250  WRITE  (6,890) 

GO  TO  240 

260  WRITE  (6,900) 

GO  TO  240 

270  WRITE  (6,910) 

GO  TO  240 

280  WRITE  (6,920) 

GO  TO  240 

290  WRITE  (6,930)  NRTD 

GO  TO  240 

300  CONTINUE 

C  THE  ARRAYS  T ABA  AND  TABB  MUST  BE  ZEROED  BECAUSE  THE 

C  ZEROES  ARE  USED  AS  INDICATORS  FOR  THE  OUTPUT  FORMAT 

OF  THE  TABLES. 

IF  (NSTCDS. NE.l  .AND. K16.NE.0)  GO  TO  400 


TR902B0 

TR90281 

TR90282 

TR90283 

TR90284 

TR90285 

TR90286 

TR902B  7 

TR90288 

TR90289 

TR90290 

TR90291 

TR90292 

TR90293 

TR90294 

TR90295 

TR90296 

TR90297 

TR90298 

TR90299 

TR90300 

TR90301 

TR90302 

TR90303 

TR90304 

TR90306 

TR90306 

TR90307 

TR90308 

TR90309 

TR90310 

TR903U 

TR90312 

TR90313 

TR90314 

TR90315 

TR90316 

TR90317 

TR90318 

TR90319 

TR90320 

TR90321 

TR90322 

TR90323 

TR90324 

TR90325 

TR90326 

TR90327 

TR90328 

TR90329 

TR903  30 

TR90331 

TR90J32 

TR90333 

TR90334 

TR90335 
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c 

M2  1  =  M2- 1 

TR90336 

TR90337 

M3  1  =  M3— 1 

TR90338 

M4 l =M4- 1 

TR90339 

Mll=ILR+l 

TR90340 

DU  320  I J  =  1 ,  3000 

TR90341 

DO  310  IM=  1 ,  14 

TR90342 

T  AB A ( I J , l M )  =  0 .0 

TR90343 

310 

CONTINUE 

TR90344 

320 

CONTINUE 

TR90345 

DO  340  I  J=  1 ,  MSET S 

TR90346 

DO  330  I  M= 1 , 6 

TR90347 

TAB6I IJ , IM)=0.0 

TR90348 

330 

CONTINUE 

TR90349 

340 

CONTINUE 

TR90350 

IF  (KEY4.EQ.3.0R.KEY4.EQ.4) 

GO 

TO  400 

TR90351 

WRITE  (6,1140) 

TR90352 

IF  (KEY3.EQ.0)  GO  TO  350 

TR90353 

WRITE  (6,1150) 

TR90354 

GO  TO  360 

TR90355 

350 

WRITE  (6,1160) 

TR90356 

360 

CONTINUE 

TR90357 

K AT=45 

TR90358 

DO  390  11=1, JCNT 

TR90359 

WRITE  (6, 1170,  CONDI  I I) .SHIN  INI  I I ) , SMAXINt II, .CYCINl l I,  .RATENt I I, 

, TR90360 

ISM  IN  I  I l J.SMAXt II, , CYC  1 1 I , .RATENl 1 1, , DEL  SI  II , 

TR90361 

IF  (II.LT.KAT)  GO  TO  390 

TR90362 

WRITE  (6,1140) 

TR90363 

IF  (KEY3.EQ.0)  GO  TO  370 

TR90364 

WRITE  (6,1150) 

TR90365 

GO  TO  380 

TR9036 

370 

WRITE  (6,1160) 

T  R903o  7 

380 

K  AT  =K AT  *45 

TR90368 

390 

CONTINUE 

TR90369 

400 

CONTINUE 

TR90370 

IF  (NRT0.LT.0.0R.NRTD.GT.3) 

GO 

TO  2 SO 

TR90371 

I T WQA= 1 

TR90372 

C 

TR90373 

C 

THE  LOOP  TO  780  GROWS  CRACK 

FOR 

EACH  RE  TARO AT ION  FACTOR  (MK) 

TR90374 

408 

CONTINUE 

TR90375 

E 1=FXM( NS  TCDS ) 

TR90376 

IF  (KEY4.NE.3.AND.KEY4.NE.4) 

GO 

TO  410 

T  R903 1 7 

IF  (KI7.EQ.lt  CALL  RANGEN  IKR1, 

KR2) 

TR90378 

410 

CONTINUE 

TR90379 

IF  ( El. LT .0.001 )  NRTD= 1 

TR90380 

DUM 1= 1.0 

TR90381 

N  A=  0 

TR90382 

XF ACT  =1.0 

TR90383 

KNT  =  0 

TR90384 

ARY2=0 . 0 

TR90385 

I  CHK  =  0 

TR90386 

KE  Y  =  0 

TR90387 

CR ACK  =  T  WO A (  ITWOA) 

TR90388 

0OT  =CR ACK/ ( 2.0*A0B*T) 

TR90389 

IF  (NRTD.EQ.3)  J0E=1 

TR90390 

IF  (KEY2.EQ.0.0R.NRTD.EQ. 1) 

GO 

TO  420 

TR90391 
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J=1000 

TK90392 

SMIN( 1000 )  =  0.0 

TR90393 

CALL  DELTAK 

TR90394 

ODD A=CR  ACK/ ( 2.0*A0B) 

TR90395 

CALL  RPL AST  ( DUM3 f ODD A , AR Y1 , ARY2 , AK 1 , E 1 ,R Y1 , R Y2 f DUM1 ) 

TK90396 

WRITE  (6,800)  ARY  2 

T R9039  1 

420 

CONT  INUE 

TR90398 

C 

TR90399 

C 

THE  LOOP  TO  760  REAPPLIES  THE  SPECTRUM  AS  DETERMINED  BY 

TR90400 

C 

THE  NUMBER  OF  PASSES. 

TR90401 

c 

TR90402 

KPS  =  0 

TK9040  i 

DO  760  I P AS S= 1 , SF 

TR9040 ♦ 

KPS=KPS*1 

TR904J5 

IF  (KEY5.EQ.1)  GO  TO  430 

TR90406 

WRITE  (6,1180)  IPASS 

T  K 9 04 07 

WRITE  (6,1190) 

TK90408 

430 

I  NX  =  0 

TK90409 

o 

ii 

X 

“5 

TR90410 

C 

TR904I1 

c 

EACH  OF  THE  TOTAL  NUMBER  OF  LAYERS  WITHIN  THE  SPECTRUM 

TR90412 

c 

IS  NOW  APPLIED  TO  THE  INITIAL  CRACK  IN  LOOP  TO  730. 

TR90413 

c 

TR90414 

JGX  =  0 

TK90415 

440 

JGX  =  JGX ♦ l 

TR90416 

DO  730  J 1 J=  1 , JCNT 

T  R  9  04  1  7 

IF  (K14.NE.1)  GO  TO  450 

TR90418 

IF  (KPS.EQ.2. AND. J1J.EQ.M11 )  J1J=M2 

TR90419 

IF  (KPS.EQ.3.AND.J1J.EU.M11)  J1J=M3 

T  R  90420 

IF  ( KPS. E 0.4. AND. J1J.EQ.M11 )  J1J*M4 

TR90421 

450 

CONTINUE 

TR90422 

J  =  J  1J 

TR90423 

IF  (KEY4.EQ.3.0R.KEY4.EQ.4)  J-I SEG( J1J) 

T  R904  24 

J  WD  =  0 

TR90425 

IF  (K8.EQ.0)  GO  TO  490 

TR90426 

IF  (DRY. LT. 0.01. AND.WET.LT. 0.01)  CALL  ERROR  (306) 

TR9042  f 

CYC(J)=CYCIN(J)*XCYC*DRY 

TR90426 

K  A9  =  1 

TR90429 

GO  TO  480 

TR90430 

460 

CYC  (  J  )=CYCIN( J )*XCYC*WET 

TR90431 

K  A9=4 

TR90432 

IF  (K9.EU.2)  KA9 =2 

TR90433 

GO  TO  480 

TR90434 

470 

CYC( J)=CYCIN( J)*XCYC*HUM 

TR90435 

K  A9  =  3 

TR9043O 

4  80 

CONTINUE 

TR90437 

JWD=JWD+i 

TR90438 

490 

CONTINUE 

TR90439 

IF  (NRTD.EO.  1)  GO  TO  540 

I"  R90440 

C 

IF  RETARDATION  IS  REQUIRED  ,  THE  ANALYSIS  IS  DONE  CYCLE  BY  CYCLE 

TK90441 

J1  =  J 

TR90442 

IF  (K8.NF  .0.AND.KA9.EQ. 1)  J  1=J  +  JCNT 

TR90443 

IF  (K8.NE .0.AND.KA9.EQ.3)  J 1- J  1 +  ( 2* JCNT I 

TR90444 

CCYC-CYC(J) +CLS ( J 1 I 

TR90445 

K  CY=CCY  C 

TR90446 

CLS( J1)=CCYC-KCY 

T  R9044 / 
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CCY  C=KCY 

TK90448 

IF  (KCY.GT.O)  GO  TO  500 

TR90449 

DELK=0 • 0 

TR90450 

IF  (KEY5.6Q.0)  CALL  WRITIN  (CCYC,JX,1) 

TR90451 

GO  TO  720 

TR90452 

500 

CONTINUE 

TR9045 J 

CCYC^CCYC- JOE 

TR90454 

IF  (CCY  C )  510,510,520 

TR90455 

510 

RCY= JQE+CCYC 

TR90456 

GO  TO  530 

TR90457 

520 

RCY=JUE 

TR90458 

530 

CONTINUE 

TR90459 

540 

CONTINUE 

TR90460 

IF  (Kll.EQ.OI  GO  TO  550 

TR90461 

XFACT=STMAX-( BOT* (  STMAX-STM IN ) ) 

TR90462 

IF  (BOT. GT. 1.0)  XFACT^STM IN 

TR90463 

SM IN ( J )=XFACT*SMININ(J)+RESID2 

TR90464 

SMAX( J)=XFACT*SMAXIN(J)+RES 102 

TR90465 

C 

T  R90466 

550 

CONTINUE 

TR90467 

IF  (K10.EQ.0)  CALL  OELTAK 

TR90468 

IF  (K10.E0.2)  CALL  RDELK ( 01  A , FMAX ) 

TR90469 

IF  (KlO.NE.l)  GO  TO  560 

TR90470 

FSUBK=1.2*SQRT (3. 1416*CRACK/2.0)  /i.5708 

TR90471 

AK 1 =  SM AX ( J )  *  FSUBK 

TR9Q4  l 

DELK  =  (SMAX(J)-SMIN(J))  ♦  FSUBK 

TR90473 

GKT=GMIN+( (GMAX-GMIN)*EXP(-4.605*CRACK/(2.0*AREF) ) ) 

TR90474 

DEL  K= DELK* GKT 

TR90475 

AK 1  =  AK 1  *  GKT 

TR90476 

5  60 

CONTINUE 

TR90477 

C 

THE  FOLLOWING  TESTS  SHOULD  BE  CONSIDERED  TEMPORARY  UNTIL 

T  R904  J < 

C 

SUCH  TIME  AS  THE  DA/DN  VS  DEL  K  PLOT  IS  BETTER  DEFINED. 

TR90479 

C 

TR90480 

IF  (DELK.LT.CYCTD)  GO  TO  710 

TR90481 

IF  (BOT.GE.l.O)  GO  TO  570 

TR90482 

IF  (DELK.LT.(0.9*KIC))  GO  TO  590 

TR90483 

IF  (KEY5.EQ.1)  GO  TO  580 

TR90484 

WRITE  (6,1200) 

TR90485 

WRITE  (6,1210)  J,SMIN(J), SMAX(J) , CYC(  J)  ,RATEN( J) , DELK 

TR90486 

GO  TO  580 

TR90487 

5  70 

IF  ( DELK. LT .(0.9*KC) )  GO  TO  590 

TR90488 

IF  (KEY5.EQ.1)  GO  TO  580 

TR90489 

WRITE  (6,1240) 

TR90490 

WRITE  (6,1210)  J,SMIN(J),SMAX(J),CYC(J) ,R ATEN( J ) , DELK 

TR90491 

580 

KDX= I P  ASS 

TR90492 

JDX= J 1 J- 1 

TR90493 

DA A=CR ACK 

TR90494 

GO  TO  770 

TR90495 

C 

TR90496 

C 

SUBROUTINE  CRATE  DEFINES  A  CRACK  GROWTH  RATE,  DADN,  FOR 

TR90497 

C 

A  GIVEN  VALUE  OF  DELTA  K.  IT  THEN  CALCULATES  A  NEW  BOT 

TR90498 

C 

AND  CRACK  LENGTH. 

TR90499 

C 

TR90500 

590 

CQNT  INUE 

TR90501 

IF  (NRTD.EQ.l)  GO  TO  600 

TR90502 

ODD A= CRACK/ (2.0*AOB) 

TR90503 
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CALL  RPLAST  ( DUM3 , ODD A , AR Y 1 , ARY2 , AK 1 , E 1 , R Y 1 , R Y2 , DUM1 ) 

600  CONTINUE 

RAT  E-RATEN ( J ) 

R 1-RR ( J  ) 

IF  (KA9.E0.2)  GO  TO  620 

IF  (KA9.EQ.4)  GO  TO  610 

IF  (KA9.EQ.5)  GO  TO  625 

CALL  CN  ( RATE, KA9,R1, KEY7, DADN, DELK) 

GO  TO  630 

610  CALL  COMP  1  l DADN, KEY7,R 1, RATE , DELK) 

GO  TO  630 

620  CALL  COMPKL  ( DADN , R 1 , RATE , DEL K , DE K , DE DN , MD) 

GO  TO  630 

625  CALL  ADPDA  ( R 1 , DADN f DELK , NSEG , DACON , D SLOPE , DKMA X, RVAL , I PF ,NRC ) 
630  CONTINUE 

DADN  =D ADN  *  FACDA 
IF  INRTD.EQ.l)  GO  TO  640 
KNT 1=0 

IF  (0UM1. GT. 0.999. OR. RCY.LE .2.0)  KNT1-1 

CALL  CRKGKO  ( DC  RACK , CRACK , DADN , DUM1 , A08 ,RC Y » KN T ,KN T 1 ) 

GO  TO  650 
640  CONTINUE 

DCRACK=2.0*DADN*CYC (J )*AOB 
CCL=CYC ( J  ) 

C R AC K= CRACK  «-DCR  ACK 

IF  (KEY5.EQ.0)  CALL  WRITIN  (CCL,JX,2) 

650  CONTINUE 

BOT=CRACK/( 2.0*T*A0B) 

IF  (NRTD.EU.l)  GO  TO  670 

IF  (DUM1.GT .0.999. OR. RCY.LE. 2.0)  GO  TO  660 

DUM=DUM  L 

CALL  DELTAK 

ODD A= CRACK/ ( 2.0*A0B ) 

CALL  RPLAST  ( DUM3 , ODD A , AR Y 1 , AR Y2 , AK 1 , E 1 , R Y1 , R Y2 , DUM 1 ) 

DUM4=DIJM  I 

0UM1=( ( DUM4-DUM )  *  0 • 6 ) +DUM 
KNT  1=  I 

CALL  CRKGRO  (DC RACK , CR ACK , DADN, DUM 1 ,AOB ,RC Y , KNT , KNT 1 ) 

660  CONTINUE 

IF  (KEY5.EU.0)  CALL  WRITIN  (RCY,JX,2) 

IF  (CCYC.GT .0.0 )  GO  TO  500 
670  CONTINUE 

IF  (KEYl.EU.l)  GO  TO  690 
IF  (CRACK.LT. WIDTH)  GO  TO  690 
IF  (KEY5.EU.I)  GO  TO  680 
WRITE  (6,1220) 

WRITE  (6,  1210)  J, SMIN(J) , SM AX ( J ) , CYC ( J )  ,RATEN( J) , DELK , DADN , CR AC K 
630  KOX  = I  PA SS 

JDX  =  J  1 J 
DA  A=CR ACK 
GO  TO  770 
690  CONTINUE 

COLUMNS  4,5,6  OF  ARRAY  TABB  ARE  USED  TO  STORE  THE 
CRACK  LENGTH  AND  PASS  AND  LAYER  NUMBERS  AT  THE  TIME 
THE  PART-THRU  CRACK  BECAME  A  THRU  CRACK. 


TR90504 

TR90505 

TR90506 

TR90507 

TR90508 

TR90509 

TR90510 

TR90511 

TR90512 

TR90513 

TR9051** 

TR9051 > 

TR90516 

TR90517 

TR9U51B 

TR90519 

TR90520 

TR90521 

TR90522 

TR90523 

TR90524 

TR90525 

TR9052o 

TR9G52  7 

TR90523 

TR90529 

TR90530 

TR905  31 

TR90532 

TR90533 

TR90534 

T  R  9  0  3  35 

TR90536 

TR90537 

TR90538 

TK90539 

TR9U540 

TR90541 

TR90542 

TR90543 

TR90544 

TK90545 

TR90546 

TR90547 

TR9054Q 

TR 90549 

TR90550 

TR90551 

TR90532 

TR90553 

TR9C554 

TR90555 

TR90556 

TR90537 

TR90553 

TR90559 
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c 

IF  (KEY.EQ.l. OR.BOT.LT. 1.0)  GO  TO  700 
T  ABB (NSTCDS, 4 )=CRACK 

IF  (K10.EQ.2I  T  ABBI NSTCDS,4 )  =  TABB(NSTCDS,4)  /(A0B*2.I 
TABB(NSTC0S,5I=IPASS 
T  ABB(NSTCDS*6)  =J1J 
KEY=  1 

700  DAA=CRACK 
GO  TO  720 

710  IF  (KEY5.EQ.0)  CALL  WRITIN  (RCY,JX,3I 
720  IF  ( JWD.EQ.l)  GO  TO  460 

IF  (K8.EQ.2.AND.JWD.EQ.2)  GO  TO  470 
IF  (K12.NE.1)  GO  TO  730 

IF  ( JGX.LT.NPAS.ANO.J.EQ.ILR)  GO  TO  440 
IF  ( J.EQ.M21.0R.J .EQ.M31.QR.J.EQ.M41)  GO  TO  740 
730  CONTINUE 
740  IF  (KPS.EQ.4)  KPS  =  0 

C  THE  FINAL  CRACK  LENGTH  FOR  EACH  PASS  IS  NOW  STORED  IN 

C  TABA. 

C 

TABA ( I  PASS, NSTCDS l=CRACK 

IF  (K10.EQ.2I  TABA(IPASS,NSTCDSI=TABAIIPASS,N$TCDSI/(A0B*2.) 
IF  (IPASS.GT.3)  GO  TO  750 
DCRACK=CRACK— TWOA ( I  TWO A  I 
IF  (DCRACK. LT.O. 00001 »  ICHK=1 
IF  ( ICHK.NE.l)  GO  TO  750 
T  WO A ( ITWOA)=TWOA( I TWO A) +0.01 
IF  (TWOA( ITWOA) .GT.0.5)  GO  TO  790 
GO  TO  410 
150  CONTINUE 
760  CONTINUE 
C 

C  COLUMN  2  OF  TABB  IS  USEO  AS  AN  INOEX  FOR  PRINTING.  THE 

C  MAGNITUDE  OF  THE  COEFFICIENT  IS  SET  EQUAL  TO  THE  NUMBER 

C  OF  PASSE-S  COMPLETED  AT  EXIT  FROM  LOOP  27.  COLUMN  3  OF 

C  TABB  STORES  THE  LAYER  NUMBER  PRIOR  TO  POINT  OF  EXIT. 

C 

T  ABB(NSTCDS»1)  =  CRACK 

IF  (K10.EQ.2)  T  ABB ( NS  TCDS ,  1 1  =  TABB (NSTCDS, 1 1  /(A0B*2.I 
T  AB8(NST  CDS*  2 )  =  SF 
T ABB (NSTCDS , 3 >= JCNT 
GO  TO  780 

770  TABB(NSTCDS* 1 )=DAA 

IF  (K10.EQ.2)  T  ABBINSTCDS* 1 )  =  TABB (NSTCDS, II  /(A0B*2.1 
T  ABB(NSTCDS»2)  =  KDX 
TABB(NSTCDS, 3)= JDX 
780  CONTINUE 

IF  (K10.EQ.2)  TWOA(l)  =TW0A(1)  /  (A0B*2.) 

CALL  OUTPUT  ( BLK , JOB ) 

IF  (K15.EQ.ll  CALL  PLOTR 
CALL  STATUS  (IS) 

KHR=IS( 8)/360000. 

ISM=IS(8)-(KHR* 360000.) 

KMN= ISM/ 6000 • 

SEC= ( l SM- (KMN*6000. I ) /100. 

WRITE  (6,980)  KHR ,KMN , SEC 


TR90560 

TR90561 

TR90562 

TR90563 

TR90564 

TR90565 

TR90566 

TR90567 

TR90568 

TR90569 

TR90570 

TR90571 

TR90572 

TR90573 

TR90574 

TR90575 

TR90576 

TR90577 

TR90578 

TR90579 

TR90580 

TR90581 

TR90582 

TR90583 

TR90584 

TR90585 

TR90586 

TR90587 

TR90588 

TR90589 

TR90590 

TR90591 

TR90592 

TR90593 

TR90594 

TR90595 

TR90596 

TR90597 

TR90598 

TR90599 

TR90600 

TR90601 

TR90602 

TR90603 

TR90604 

TR90605 

TR90606 

TR90607 

TR90608 

TR90609 

TR90610 

TR90611 

TR90612 

TR90613 

TR90614 

TR90615 
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790 


800 
810 
820 
8  30 


CONTINUE 
GO  TO  30 
IF  ASCENDING 


FORMAT 
FORMAT 
FORMAT 
FORMAT 
IF  8 • 4/ • 
2/  1 


( lXy  F10* 7 ) 

(IX, 'HUM' , 25X, , F6.4) 
( IX, 2013) 

(IX, • L JOB 1 , 24X , ' - ' ,17/* 


LOECK'  ,2  3X , • *• ,I3/f 


STM  I N • 


:,  •  *• 

13/' 


, F8 • 4/ • 
XCYC'  ,, 


TR90olo 

TR90617 

TR90618 

TR90&19 

TR90620 

TR90621 

TR90622 

TR90623 

STMAX'  ,23X, • =  '  , TR90624 


ORY',25X,'='  ,F  6«  4/  1 


MET1 ,2 5X  ,  '  =  • ,F6.4TR90625 
TR90626 


840 

FORMAT 

I'  RESIDi*  »22X»'  =  ' »F6.2/'  RE  SI D2 ' , 22X , •  =  • , F6 .2/ •  TwOA* f 24X , TR9062 7 

1'  =  ' , F  7 « 

,5) 

TR9062B 

850 

FORMAT 

I9I5/18I 10F7.3/) ) 

TR90629 

860 

FORMAT 

(3FL0.4) 

TR90630 

8  70 

FORMAT 

(•  PRESTRESS', 19X,'='fF8. 3) 

TK90631 

880 

format 

('  DA/DN  VS  DELTA  K  DATA  IS  NOT  INCREASING 

ON  CURVE' 

» 1 4  »  3X , T R906  32 

l'FOR  UALUES  NO' , 14, 3X , • AND ' , I 4/ •  THE  NEXT  PROBLEM 

HILL  BE  ATTEMPTETR906 33 

20*  ) 

TR90634 

8  90 

FORMAT 

('  K I 1 = I  ,  BUT  STMAX  =  0  THE  NEXT  PROBLEM  HILL  8E 

ATTEMPTK90635 

IT  ED  •  ) 

TR90636 

900 

FORMAT 

('  K8  =1  ,  BUT  DRY  =  0  THE  NEXT  PROBLEM 

HILL  BE  ATTEMPTETR90637 

ID*  ) 

TR90638 

910 

FORMAT 

('  K10=l  ,  BUT  GMAX  =  0  THE  NEXT  PROBLEM  HILL  BE 

ATTEMPTTK90639 

1ED1  I 

TR9064O 

920 

FORMAT 

('  KEY6=1  ,  BUT  FIRST  BOEING  MK  VALUE  =C 

THE  NEXT 

PROBLE  TR9C64I 

1M  WILL 

BE  ATTEMPTED') 

TR90642 

930 

FORMAT 

(•  NRTO=' ,  13,'  ILLEGAL  VALUE  -  THE  NEXT  PROBLEM  HILL 

BE  ATTETR90643 

1MPTED ' ) 

TR90644 

940 

FORMAT 

(5X, ' JP4 ' ) 

TR90645 

950 

FORMAT 

( 5X » 'DISTILLED  HATER') 

TR90646 

960 

FORMAT 

C  I ERR= ' ,  14/ •  THE  NEXT  PROBLEM  HILL  BE  ATTEMPTED') 

TR90647 

970 

FORMAT 

('  NPAS' ,24X,'=« , 15/'  HR'  ,25X,' *• ,15) 

TR90C48 

980 

FORMAT 

('  THE  TIME  IS  NOW' ,  I  3, •- • , 12  ,  • -• ,F5.2) 

TR90649 

990 

FORMAT 

(IX, • IS( 2)=' , 14,4X, • I$(3)=',I4) 

TR90650 

1000 

FORMAT 

(IX, 16A4/ ) 

TR90651 

1010 

FORMAT 

(2012) 

TR90652 

1020 

FORMAT 

(6F10.5) 

TR90633 

1030 

FORMAT 

(315, 5X,  3F10.0) 

TR90654 

1040 

FORMAT 

(11F5. 0,215) 

TR90635 

1050 

FORMAT 

(F10.0,6I5,2F10.0, 16) 

TR90o36 

1060 

FORMAT 

( 5F 10*  0 ) 

TR90657 

1070 

FORMAT 

(5F10.0, I 10) 

TR90658 

1080 

FORMAT 

(  1015) 

T  R906‘>9 

1090 

FORMAT 

( 10F5.0) 

TR90660 

1  100 

FORMAT 

( 16, I4,5F10.0) 

T  R906O I 

1110 

FORMAT 

( 1  IF  5  •  3 ) 

T  R90662 

1120 

FORMAT 

(  IX,  UF6.3) 

TR906O3 

1130 

FORMAT 

(1H  , • A  OVER  B  RATIO  ', 14X,  '  -  ' ,F8.5/1H  ,'PHI 

SQUARED' 

*17X»'=T  R 9 06 6 4 

1',F8.5/IH  , 'TENSILE  YIELD  STR ENGT H* ,6X, • = • , F 8 . 2 , • 

KSI'/IH  , 

• STRESSTR90665 

1140 


2  INTENSITY  FACTOR  KC  =',F8.2/1H  , 
3F8.2/IH  ,'OA/DN  DELTA  K  THRESHOLD 
4HRESH0L  D  = •  , F 8. 2/ 1H0 , • T HE  NUMBER 

5H0 , 1  THE  TOTAL  NUMBER  OF  LAYERS  IS 
FORMAT  ( 1H1 , 15X , ' AS  READ 

1***4^******************* 


STRESS  INTENSITY  FACTOR  KIC  =',TR90666 
*  1 ,  F8 • 2/ 1 H  ,  • D A/DT  DELTA  K  TTR906o7 
OF 


INTENSITY  FACTOR  KIC  »• 

PASSES  TO*BE 

,16) 

•  *♦♦♦ • 


MADE 


IS*  ,  I  6/  1  T R906&8 
TR90669 

, •********TR90670 


*******************  ,  f  •  *****  *************  j  R906  1 1 
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1150 

1160 

1170 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 


1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1400 

1410 

1420 

1430 

1440 

1450 

1460 


2*+*'/ ) 

FORMAT 

1CYCLES 

FORMAT 

1CYCLES 

FORMAT 

FORMAT 

FORMAT 


(•  COND. 

RATE 
(•  COND. 
RATE 


SMIN 


SHIN 


SMAX 


SMAX 


SMEAN  SALT  CYCLES  RATE 

DEL  S'//l 

SMIN  SMAX  CYCLES  RATE 

DEL  S* // I 

( 1H  ,A4, 2F 8.2, F9. 1,3F8. 2, F 9. I, 2F 8. 2) 

( 1H 1 / / 1  PASS  NUMBER  • , I  5 1 

C 1H0  t • L A YER  SMIN  SMAX  CYCLES  RATE 
1  DA/DNCDT)  2AF  RETARD1//) 

FORMAT  (1H0, ‘DELTA  K  IS  GREATER  THAN  0.9KIC9/1H  f 1  THE  VALUES  AT 
1INT  OF  EXIT  HERE  AS  FOLLOWS 1 / ) 

FORMAT  ( lHOt  I5f  IX  ,  2F8 .2 1 F 9.  1 ,  F 8 . 2  ,F  10 . 3  f 2 X,  E 14.  7f  F 12. 5 f  Fi  0. 6) 


DEL  K 


FORMAT  ( 1H0  *  9  2 A  IS  GREATER  THAN 
IT  OF  EXIT  WERE  AS  FOLLOWS9/) 

FORMAT  (1H  ,  12X, A4,4X,F8.4) 

FORMAT  ( lHOt  9  DEL  T A  K  IS  GREATER 
1NT  OF  EXIT  WERE  AS  FOLLOWS9/) 

FORMAT  ( 1H1 »  9  THE  MULTIPLIER  FOR  THE 
FORMAT  ( 1 HO  t  9  THE  FOLLOWING  SET  CF 
1L  BE  APPLIED  TO  THE  SPECTRUM9 // 1H 
2) 

FORMAT  ( lHOt 9  THICKNESS9  f 19X , 9  =  9 , F8. 5f 9 
1  INFINITE9/) 

FORMAT  (  1H0, 9  THICKNESS9 , 19X , 9 = 9 , F 8. 5 , 9 
INCH! S ) 9 / ) 

( 16A4) 


l9 ,F8.2, 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
FORMAT 
1*N 

FORMAT 


TR90672 
TR90673 
TR90674 
TR90675 
TR90676 
TR90677 
TR90678 
TR90679 
TR90680 
POT  R90681 
TR90682 
TR90683 
POI NTR90684 
TR90685 ' 
TR90686 

THAN  0. 9KC  9 / 1H  * 9  THE  VALUES  AT  P0ITR90687 

TR90688 
IS  9  f  F8 .3)  TR90689 

CONDITION  MULTIPLIERS9, /1H  ,9WILTR90690 
,8X, 9 COND IT  ION9 , 2X, 9 MUL T l PL  I ER9 / TR90691 

TR90692 

INCH ( S ) 9 /1H  f 9  WIDTH9 ,23X , 9 *TR90693 

TR90694 

INCH(S) 9/lH  , 9  WIDTH9 ,23X , 9 =TR90695 

TR90696 


THE  WID  TH  9 / 1H  , 9 THE  VALUES  AT 


NUMBER  OF  CYCLES 


( 9  KR1  =  9 ,  15, 10X, 9KR2  =  9 ,15) 
(12F5.0) 

<5X, 9  LAB  AIR9 ) 

<5X, 9  HIGH  HUMIDITY9 ) 

(•  THE  FOLLOWING  ENV I RONME NT ( S ) 


USED  IN  THIS  PROBLEM9) 


(5X, 'ENVIRONMENTAL  DATA  AS  ENTERED  IN  PROBLEM  INPUT9) 
(  215, 10 A4 ,  315) 

(  3 (  E10.3  , 2F5 • 0 )  ,  F5.0) 

( 5X , 22HP AR I S  EQUATION  WITH  -  , 10A4  /  5X,18HDADN 
//10X,9C9 ,12X,9N9 ,4X, 9 DKMAX  9 ,  7X, 

( 5X, 23HF0RMAN  EQUATION  WITH  -  ,10A4/  5X,37HDADN 
1*N  /( (  1-R)*KC-DELTAK)  / / 1  OX , 9 C 9  , 1 2X , 9 N 9 ,4X , 9 DKMAX 9 ,  7X, 
FORMAT  (5X,E10.3,  5X,  F5.2,  3X,  F5.1  ,  4X ,  F7.3  ) 

FORMAT  <1H  r 9  HOL  E  DIAMETER9  ,  15X,  9=9  ,  F7.4  ) 

FORMAT  (  9  CONSTANT  FACTOR  ON  DADN 9  , 5X ,  9=9 
ENO 


TR90697 
TR90698 
TR90699 
TR90700 
TR90701 
TR90702 
TR90703 
TR90704 
TR90705 
TR90706 
*  C*DELTAK*TR90707 
9  R9)  TR90708 

=  C*0ELTAK*TR90709 
9 KC  9 )  TP 907 10 

TR90711 


,  F7.4) 


TR90712 

7R90713 

TR90714 
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SUBR0UT1NE  ADPD A ( R 1 , D ADN , DELK  ,NSEG, OACON , DSIOPE ,DKMAX ,R  VAL ,  l PF , 
1NKC  I 

OI  MENS  ION  NSEG( 3>,DAC0N( 3, 3 ) , DSLOPE (3 ,3 > ,DKMAX(3,31 ,RVAL( 3) 
DENOM  =1.0 

IF  (IPF.EQ.L)  DENOM  =  (1.-R1)  *RVAL(l)  -DELK 
KURV  =  2 

IF  (NRC.EQ.3.AND.R1.GT.RVAL (2) )  KURV  =  3 
IF  I IPF.EO.l.OR.NRC.EQ.l)  KURV=1 
KOUNT  =0 


10  NLINE  =  NSEGIKURV ) 

00  20  1=1, NLINE 

IF  (OELK.LE.OKMAXIKURV, I ) )  GO  TO  30 
20  CONTINUE 
I=NL INF 


30  OADN=ABS( ( OACON (KURV, I)*  OE LK**DSLOPE ( KURV, I  I  I /DENOM) 
IF  I IPF.EQ. l.OR.NRC.EQ. 1)  RETURN 
KOUNT  =  KOUNT  ♦  1 
IF  (KOUNT. EQ.l)  GO  TO  40 


0  AON  1=  OAON 

OADN  =  EXP  (AL0GI0ADN1I  ♦  ( ALOG( 0A0N2 )- ALOG ( 
11/  (  RVAL  (  KURV-*- 1  )  -  R  VAL  (  KURV  )  )  ) 

RETURN 

40  KURV  =  KURV  -  1 
DA0N2  =  D ADN 
GO  TO  10 
ENO 


0A0N1) )*( 


Rl-R  VAL I KURV 


T090A01 
T090A02 
T09DA03 
TD90A04 
T090A05 
T090A06 
T09CA07 
TD9DA08 
TD90A09 
TD90A10 
T09DA11 
T090A12 
TD9DA13 
TD90A14 
T09CA! 5 
T  090Ai& 
T090A17 
T09CA1B 
TD9DA19 
»  T090A20 
TD90A21 
TD90A22 
1090/23 
TD90A24 
TD9CA25 
T090A26 
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10 

20 


30 

40 


50 

60 

70 


SUBROUTINE  DELTAK  DELT0010 

COMMON  SM  IN  INI  1000) ,SMAXIN(  1000) ,C YCI N( 1000) ,C0ND(  1000)  ,  l NDEX ( 10 ) , DELT0020 
1SMULT 1 10 ) i NL  ARS ( 10 ) , SM IN  I  1000 ) , SMAXI 1 000) .CYC(IOOO) , DEL  SI  1000 ) , TW00ELT0030 
2A( 10) ,TABA( 3000 ,14) ,T ABB ( 14,6 ) .MOVER, NCONO , MSETS, XC VC ,T ,AQB , FVS ,KCDELT004 
3,KIC»SF»PHISQ,EXM( 14) ,NTWOA , JCNT , ALFA ,C , J , I  PASS »CRACK ,DELK, SRAT 10 , DEL T0050 
4WIDTH, BOT , ET  A, DADN, ICHK ,L 10 ,KE V 1 , KE Y2 ,KEY3 , KE Y4 ,KEY5, KE Y6 ,KEY7 , K120ELT0060 
COMMON  K13, K17, ISEGI 1000) ,RATEN( 1000) ,AM( 11) »HUM, K14,K1 5, I PROB , RR I DELT0070 
11000) ,K8,K9,K 16, DEK 1 10,20 ),DEDN( 10,20) ,MD l, MD2 , MD3 , MD4 , MD5 , MD6 , MD 7DELT0080 
2 , M08, MD9* MD ( 10) , IMD ,NRTD, DDDA , DUM 1 , E 1 , ARY1 , DUM3 , ARY2 , AK 1 , RY1 ,RV2, KDELT0090 
3A9*KEY»K10»DRY*HET*JWD*KCC» INDX , I  CYC , I T WOA ,CYCTD, T I MTD , INX, AREF ,GMOELTO 100 
4AX ,GMIN, PTITLEI 3 , 16 ) , LT I TLE 1 2 , 16) , L JOB , LDECK , I  JOB , I  DECK  *Kl l , I  ERR, IDELT0110 
5SI12),STMAX,STMIN,NRD,NSTCDS,XFACT, IQ  1 1000) ,NA 
DIMENSION  AN  1 11 ) 

DATA  AN/ 1.0, 1.0, 1.0, 1.0, 1 .004 , 1 .0 12 , 1 .02, 1. 027, 1. 035 , 1. 043 , 1. 5/ 

IF  IKEY6.EQ.1)  GO  TO  20 


DO  10  11=1,11 
AM(  1 1  )  =  AN( I  I ) 
CONT  INUE 
IF  (KEY6.EQ.2) 
CONTINUE 


KE Y6= 1 


THIS  SUBROUTINE  CALCULATES  DELTA  K  FOR  EITHER  A 
THRU  CRACK  UR  A  THRU  CRACK  FROM  THE  MAXIMUM  AND 
STRESSES  FOR  A  GIVEN  LAYER.  A  CORRECTION  FACTOR 


PART- 
MINIMUM 
,  M  (EM), 


WHICH  IS  A  FUNCTION  OF  THE  APPLIED  STRESS,  IS  USEO  TO 
ADJUST  K  AS  THE  CRACK  APPROACHES  THE  OPPOSITE  SIDE  OF 
THE  PLATE. 

FOR  A  THRU  CRACK,  BOT  IS  GREATER  THAN  OR  EQUAL  TO  l. 


IF  IBOT.GE.l.)  GO  TO  100 
PICB=1.21*3.1416*CRACK/(2.0*A0B) 

SUBROUTINE  AFIT  DEFINES  THE  EM  VS. 
OF  SRAT 10.  TANBOT  IS  FOUND  IN  AFIT 


BOT  CURVES  FCR  VALUES 
AS  ARE  Y2  AND  SLOPE. 


SRAT  IO=SMAX( J)/FYS 
IF  (KEY6.NE .0)  GO  TO  40 
IF  (BOT. LT. 0.61 >  GO  TO  30 

CALL  AFIT  ( AOB, PHISQ, SLOPE, SRATIO, TANBOT) 

IF  (BOT. LT. TANBOT )  GO  TO  30 

IF  (BOT. GE. TANBOT)  EM=Y2+SL0PE*( BOT-l .0 ) 

GO  TO  70 

E  M  =  SQRT ( C*T  AN ( ALF  A*BOT ) / ( AL  FA*BQT  )  ) 

GO  TO  70 
AGH=0 .0 
DO  50  IK=2, 11 
AGH= AGH+O • l 

IF  (BOT.LE.AGH)  GO  TO  60 
CONTINUE 
I  K=  1 1 
I K 1= I K— 1 

EM= AM ( IK )+( BOT-AGH) *10.0* (AMI IK)-AM(IKl)! 

AKMAX=SQRT ( ( P ICB*SMAX ( J )**2 )/ ( PHI SQ-0.2 12*SRAT I 0**2 ) ) *EM 
SRAT IO=SMIN( J  )/FYS 
IF  (KEY6.NE.0)  GO  TO  90 


DELT0120 
DELT0130 
DEL  T0140 
DELT0150 
DELT0160 
DELT0170 
DELT0180 
DELT0190 
DELT0200 
DELT0210 
DELT0220 
DELT0230 
DELT0240 
DELT0250 
DEL  T  0260 
0ELT0270 
DELT0280 
0ELT0290 
DELT0300 
0ELT031 0 
DELT0320 
DEL  T  0330 
DELT0340 
DELT0350 
DELT0360 
0ELT0370 
DELT0380 
DELT0390 
DELT0400 
DELT0410 
0ELT0420 
DELT0430 
DELT0440 
DELT  0450 
DELT0460 
DELT0470 
DELT0480 
0ELT0490 
DELT0500 
DELT050 1 
DELT05 10 
DELT0520 
DELT0530 
DELT0540 
DELT0550 
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o  n  o 


IF  ( BOT .IT. 0.61 )  GO  TO  80 

CALL  AFIT  (AOB, PHISQ, SLOPE, SR AT  1 0, TANBOT) 

IF  (BOT. LT. TANBOT)  GO  TO  80 

IF  (BOT. GE. TANBOT)  EM=Y2+SL0PE*( 80T-1.0) 

GO  TO  90 

EM=S0RT (C*T  AN( ALFA* BOT) /( ALFA*BOT ) ) 

AKM I N=SQR  T ( (  P  ICB*SM  IN  ( J  )**2)/(PHl SQ-0.2 12*SR ATI  0**2 ) ) *E  M 


100 

C 


110 


C 

120 

C 

C 


TEST  FOR  INFINITE  WIDTH  PLATE.... 

IF  (KEY1.EQ.0)  GO  TO  110 

AKMAX=  SQR  T ( ( 3. 141 6*CR ACK*SMAX( J )**2 ) / ( 2 . 0-( SMAX( J) 
AKM  IN=SQRT( ( 3. 141 6*CR ACK* SM IN( J )**2 )/ 

GO  TO  120 
CW=CRACK/WIDTH 

Y= l .O+O . 1 56  5*CW-0.2  88 1*CW**  2* 1 . 5254*C 

AKHAX=SQRT ( ( 3. 141 6*CR ACK* SMAX ( J ) **2 ) / 

AKMIN=SQRT( ( 3. 14 1 6*CR ACK* SM IN( J  )**2)/ 

DELK=ABS( AK MAX- AKM IN) 

AK l = AKM AX 

IF  IAKMAX.LT.AKMIN J  AK1  =  AKM  IN 
RETURN 
ENO 


(2.0-(SMIN(J)/FYS)**2)) 


W*  *3 

(2.0-( SMAX( JI/FYS) **2))*Y 
( 2 . 0—  C SMIN( JI/FYS) **2) )*Y 


DEL  r056u 
DELT0570 
0ELr0580 
0ELT0590 
DELT0600 
0ELT0610 
DELT0620 
OEL  T0o30 
DELT0640 
DEL  T0650 
DEL  T0o6u 
DELT067 J 
DELT068D 
DELTO j9D 
DEL  TO  700 
DELT0710 
DEL  TO  720 
0ELT0730 
OEL  T 0  740 
DELT  0750 
DEL  T0760 
DELT0770 
DELT  0  7d  0 
DEL  TO  790 
OEL  T0800 
DELT0810 
DELT0820 
DELT0830 
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c 

c 

c 

c 

c 


c 

c 

c 

c 

10 

c 

20 


THIS  SUBROUTINE  SEQUENCES  THE  ARRAYS 
AND  OELS  IN  ASCENDING  ORDER  (KEY4=1> 
(STORED  IN  ARRAY  DELS)  OR  IN  DESCENDING 


SMIN,  SMAX,  CYC, 

OF  DELTA  STRESS 
ORDER  (KEY4=2). 


SUBROUTINE  SEQENC  SENC0010 

COMMON  SM IN IN( 1000) , SMAX INC  1000) , CYC INC  1000) ,CONDC 1000) ,INDEX( 10) ,SENC0020 
1SMULTC 10) ,NLARS( 10) ,SMIN(  1000 ), SMAX C 1 000) .CYCtlOOO) , DEL  SC  1000 ) , TM0SENC0030 
2 A ( 10 ) , T ABAC  3000 , 14) ,TABB( 14,6) *MOVER,NCGNO»MSETS»XCYC  »T  ,AOB , FYS » KCSENC004 
3»KIC*SF,PHISQ»E  XM (14), NT WOA ,JCNT,ALFA,C,J,IPASS ,CR ACK ,DELK,SKAT ID, S  EN  COO  SO 
4^2^,BOT,ETA,OAON’  ICHK»LI0*KE*ltKE  Y2,KEY3,KEY4,KEY5,KEY6,KEY7  ,K12SENC0060 
ISEGC1000),RATENC1000)  ,AM(  11)  ,HUM,K14,  Kl  5 , 1  PROS ,  RR  (  SENC0070 
11000) «K8,K9,K16, DEM  10,20) , DEDNC 10, 20 ) , MD1 , MD2, MD3 , MD4, MD5 , MD6 , MD7SENC0080 
2,MD8,MD9,MD( 10) , I MD,NRTD, DDDA ,DUM1 , E 1 , ARY1,0UM3 , ARY2 , AK 1 , RY1 ,RY2 , KSENC0090 

^!’^T,Kl0,DRY,WET,JWD’KCC»  iNDX,ICYC,ITH0A,CYCT0,TIMT0,INX,AREF,GMSENC0100 
cr^^?I^,PTITLE<3'  16»«I-TITLE(2,16)  *LJOB,LOECK,IJOB,IDECK,K11,IERR,ISENCOIIO 
5S(12),STMAX,STMIN,NRD,NSTCDS, XFAC  T , IQCl 000) ,NA  SENC0120 

SENC0130 
SENC0140 
SENC0150 
SENC0160 
SENC0170 
SENC0180 
SENC0190 
SENC0200 
SENC0210 
SENC0220 
SENC0230 
SENC0240 
SENC0250 
SENC0260 
SENC02  7  0 
SENC0280 
SENC0290 
SENC0300 
SENC0310 
SENC0320 
SENC0330 
SENC0340 
SENC0350 
SENC0360 
SENC0370 
SENC0380 
SENC0390 
SENC0400 
SENC0410 
SENC0420 
SENC0430 
SENC0440 
SENC0430 
SENC0460 
SENC0470 
SENC0480 
S  ENC0490 
SENC0500 
SENC0510 
SENC0520 
S  ENC0530 
SENC0540 
SENC0550 
SENC0560 


JCNTM1=JCNT— 1 
DO  40  IT= 1, JCNTMl 
B=DELS( IT) 

BA=SMIN( IT) 

BB=SMAX ( IT) 

BC=CYC( IT) 

BE=RATEN(  IT ) 

I Z= JCNT- IT 
BQ=IQ(  IT) 

BR=RR( IT) 

DO  30  JJ=1,  IZ 

TEST  FOR  SEQUENCING  ORDER 

IF  (KEY4.EQ.2)  GO  TO  10 


IF  ( B-DELSC IT+JJ  )  )  30,30,20 


IF 

IF 


DESCENDING  ... 
(B-DELSC IT+JJ  )  ) 


20,30,30 


OB=DEL  S  C  IT+JJ) 
DBA=SMIN( IT+JJ) 
DBB=SM AX ( IT+JJ) 
DBC=CYC ( IT+JJ) 
OBE  =  RATEN( IT+JJ  ) 
DBQ= I Q ( IT+JJ  ) 

DBR  =  RR( IT+JJ  ) 

DEL  SC IT+JJ)  =  B 
SMINC IT+JJ)=BA 
SMAXC IT+JJ )=BB 
CYC  C  I T + J  J  )•=  BC 
RATENC IT+JJ )=BE 
IQC  I  T  +J J ) =BQ 
RR ( I T+J J )=BR 
B=DB 
BA=CBA 
BB=OBB 
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BC=  DBC 
BE=D8E 
BQ=CBQ 
BR=CBR 

30  CONTINUE 

DELS (  IT  )  =  B 
SMINI IT )  =  B A 
SMAXI IT )=BB 
C YC ( I T )  =  BC 
RATFM  I T )  =  BE 
IQ< IT  »  =  BQ 
RR( IT )=BR 

40  CONTINUE 

RETURN 
ENO 


SENCU5  70 
SENCObBu 
SENC0b9 J 
StNCOoOO 
SLNC06 1 0 
$ENCUo2l) 
SfcNC06i0 
SENC0O40 
SENCObBO 
SENCObbO 
SENCU6  7  b 
SENC06BU 
SENCU69U 
SENC070U 
SENC07I0 
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40 
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60 


SUBROUTINE  C0MP1  (DADN,KE Y7,R1,RATE ,DELK)  COMOOOIO 

DIMENSION  AJ ( 9»  3) *  DJ19.3),  AH(9,5),  DHI9.5I,  ND(9)  C0M0G020 

DATA  AJ,DJ, AH, OH, ND/O .43, 0. 365, 0. 36 5, 0. 46 ,0. 38, 0. 38 ,0.49, 0.4 ,0 . 4, 3C0M000 30 
19., 28.5,28.5, 17., 12 .5 , 12 . 5, 6. 2, 4.4 , 4. 4, 9* 100. 0 , 9*7. 0, 39. 7 , 3 7. 5 , 37 . C0M0004U 
25,28.0, 26.5,26.5, 18.5,17.5, 17.5,3*47.0,3*37.0,3*30.0,1.57,0.98, 1.0C0M00U50 
15, l  .57, l.  11,  1.45,  1.57,2.0  7,  1.48,65.1,13.1  ,6.5,65. 1 , 16 . 0 ,7 . 7 3 , 32 .9 , COMOOOoO 
49.38,8. 74, 100.3,27.1, 13 .6 , 74. 2, 25 . 1 , 1 5. 4, 195 . 3 , 1 1 . 8 ,268 .4 ,243 . 9 , 1 9C0M00070 
52.8,21.7,210.8,  100. 1 , 1 7 . 2 , 0. 0 , 2 54. 1 ,0. 0 ,0. 0 ,0. 0 ,205 . 1 ,0 . 0 ,0 .0 , 1 98 . C0MU0080 


62, 3*0. 0,9* 7 .0,26. 1,20.02, 17.47,26.1 ,19.8, 16 . 01 , 20. 5 , 16. 95 , 20. 5 , 37 . COM00090 
71,37.5,30.13,29.0,29.0,27.43,25.5,20.5, 31 . 0 , 4 l. 0, 47. 5 , 37. 5 , 32 . 8 , 34C0M00 100 
8.0, 29.0,0.0, 30.0, 0.0, 0.0, 0.0, 49.0,0.0,0.0,39.00,3*0.0,4 ,4 , 5 ,4 , 4 , 5 , COMOO  1 1 0 


93,4,3/ 

I  M0  =  7 

IF  (Rl.LT.0.2)  I MD= 1 
IF  IR1.LT.0.4.AND.R1.GE.0.2!  IMD=4 
IF  IRATE. GT. 59. 9)  IM0=IM0+l 
IF  (RAT E.GT  .179.9 )  IMD=IMD*1 
IF  (KEY7.LF.1)  GO  TO  30 
KK=NC I IMD) 

DO  10  I Z  =  2»  KK 

IF  (DHI IMO, IZJ.GE.DELK)  GO  TO  20 

CONTINUE 

IZ  =  KK 

i  y  = i z- 1 

OKI =ALOG( DHI  IMD, I Y  )  ) 

DK2  =  AL0G( DHI  I«D, l Z)  ) 

DA1= ALOGI AH(  IMD, IY)  ) 

CA2  =  ALOGI AH (  IMD, IZ)  ) 

GO  TO  60 
OG  40  I  Z=  2,  3 

IF  (DJI IMD, IZl.GE.DELK)  GO  TO  50 
CONTINUE 
I  Z=  3 
I  Y= IZ-1 

DK l  =  ALOG I DJ I  IMD, I Y)  ) 

OK2=ALOG( DJ I  IMO,  IZ)  ) 

0A1  =  ALOGI AJ I IMD, I Y)  ) 

DA2  =  AL0G( AJI IMD, IZ)  ) 

D=ALOG( DELK ) 

OADN=O.OOOOOl*EXPI I  I D-DK 1 ) *  I D A2-D A l ) / I DK2-0K l ) ) +OAI ) 

RETURN 

END 


CUM00120 
CCMOO 130 
CCM00140 
CCM00150 
CCM00160 
CCMOO 170 
CCM00180 
CCMOO 190 
C0MG0200 
CCM002 l 0 
CCM00220 
CCM0022  1 
CCM00230 
CCM00240 
CCM0U2  30 
CCM00260 
C0M00270 
CCMJ0280 
CLM00290 
C0M00300 
COMOO  310 
CCMOO  311 
CCM00320 
CCMOO  330 
CCMOO  340 
C0M00350 
CCMOO JoO 
CCM003  7 0 
CCMOO 380 
COMOO  390 
CUM00400 
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o  n 


10 


20 

30 


SUBROUTINE  WRITIN  (CCYC,JX,L2)  WKlTOOlU 

COMMON  SMININI 1000 > , S MAX  I N(  1000) , CYC  INI  1000) • CONDI  1000)  .INDEX! U)  , wRI TOO 20 
1SMULTI 10) .NLARS ( 1 0) , SM IN ( 1000 ) .SMAXI 1000) ,C YC( 1000) .DELS! 1000) , TWOWRI T0J3U 
2AI1 JJ.TABAI 3000, 14) ,T ABB l 14, 6 ) , MO VE R , NCOND , MSE T S, XCYC , T ,AOB , FYS ,KCwRI T004 
3,KIC,SF,PHIS0,EXM( 14) , NTWOA , JCN T, ALFA ,C , J , I  PASS ,CR ACK , DEL K, SRAT IU , wR I  TO J50 
4W IDTH, BOT , ETA.DAJN,  IC HK , L 10 ,K E Y 1 , KE Y2 ,KE Y3 , KE Y4 , KE Y 5, KE Y6 , KEY  7 , K12WKI fuOou 
COMMON  K 1 3 , K 1 7 , I SEGI 1000 ) ,R ATENI 1000) ,AM( 11 ) , HUM, Kl 4 , K1 5 , I PROB, RR( WK1 T0070 
11000) ,K8,K9,K16,DEK( 10, 20), DEDNI 10,20) , MD 1 , MD2 , MD3 , MD4 , MO 3 , M06 , MO  7 WR I TOOB 0 
2, MD8 , MD9, MD ( 10) , l MD ,NRTD , DDDA ,DUM 1 , E 1 , ARY  1 , 0UM3 , ARY2 , AK 1 , RY 1 , KY2 , KWR I TU090 
3A9.KEY.K10, DRY, WET, JWD.KCC, INDX, I  CYC, 1 T WOA ,C YC TD, T I MTD , I  NX , AREF ,GMwkI TO  100 
4AX,GMIN,PTITLF( 3, 16), LTITLEI2.16) ,LJUB, LDEC K , I  JOB , I DE CK ,K 1 1 , l ERR, I wR I  TO  1 1 0 


5SI  12),STMAX,STMIN,NRD,NSTCDS,XFACT, IQ (1000) , NA  mR I  TO  120 

JX  =  JX  +  1  WR I  TO  1 3  J 

IF  I JX.LE. (22*24*  INX) )  GO  TO  10  wRITul40 

WRITE  (6,30)  WRIT015C 

INX=INX*1  WkITOloO 

IF  (L2.EQ.il  WRITE  (6,20)  J ,SMIN( J) , SMAXI J) ,CCYC,RATEN( J) ,DELK  WRIT0170 
IF  (L2.EQ.2)  WRITE  (6,20)  J , SM IN ( J » , SMA X ( J ) , CC YC , R ATE N( J)  ,DELK , DADWR I  TO  180 
IN , CR ACK , DUM 1  WRIT0190 

IF  (L2.EQ.3)  WRITE  (6,20)  J , SM  I N ( J I , SMAX( J) , CC YC , R A TEN( J)  WRIT0200 

RE  TURN  WRIT0210 


FORMAT  ( IHO, 15, 1X,2F8.2,F9. 1 , F 8 .2 ,F 10 . 3 ,2 X , E 14. 7 , F !2.5,Fl0.o) 
FORMAT  (1H1, 'LAYER  SMIN  SMAX  CYCLES  RATE  OEL  K 
l  DA/DNIDT)  2AF  RETARD'//) 

END 


wR I T  0220 
wRI 10230 
WRl T0240 
WR  I  TO  2 1>  0 
WRI T0260 
WRI r027 0 
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SUBROUTINE  AFIT  ( AOB, PHI SQt SLOPE , SRAT 10, TANBOT ) 

AF  I  TOOl U 

c 

THIS  SUBROUTINE  CALCULATES  THE  SLOPE  OF  THE  PK  VS  BCT  LINE  FOR 

AFIT0G2G 

c 

BOT  GREATER  THAN  0.61 

AFITG030 

SQ=SR AT  10**2 

AFIT0040 

Y2  =  SORT ( 1 .65*A0B*(PHI SQ-0.2 12*SQ ) / ( 2. 0- SQ ) ) 

AFIT0G50 

IF  ISRATI0.LE.0.5)  GO  TO  10 

AFIT0G60 

X  1  =  0 . 65 

AF  I  TOO  70 

Y 1= l . 1493 

AFIT  GOB  G 

GO  TO  20 

AFIT  0090 

10 

X  l  =  0 . 6  1 

AFIT  G 100 

Yl=l.  1078 

AF  I  TO  1 1 0 

20 

CONTINUE 

AF I  TGI  20 

S  LOPE= ( Y2-Y  1 1 / ( l.O-Xl) 

AF I  TO  130 

T  ANPOT  =  X 1 

AF I  TO 1 40 

RETURN 

AF I  TO  1 50 

r  no 

AF l TO ioC 
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c 


10 

20 

30 


40 

50 


60 

70 

80 


90 

100 

1 10 


SUBROUTINE  CN  ( RAT E  ,K A9 , R 1 , KE Y7 , 0 AON , DE LK » 

THIS  SUBROUTINE  CHOOSES  THE  APPROPRIATE  SEE  AND  ETA  VALUES 
DATA  AT l, C1,C2,C3,C4,C5,C6,C7,C8,C9,C10/2.6,0.0016,0.0022 ,0. 
1.0030,0.0031,0.0034,0.0036, 0.0025,0.002  7,0.0029/ 

IF  (KA9.EQ.1)  GO  TO  30 

IF  (KEY7.E0.0.0R.KEY7.EQ.2)  GU  TO  40 

GO  TO  50 

SEE  l=C  1 

GO  TO  110 

SE  E 1  =  C2 

GO  TO  110 

IF  (Ri.LT.0.2)  GO  TO  10 

IF  (Rl.LT.0.4)  GO  TO  20 

SEE 1=C3 
GO  TO  110 
SEE  1  =  C4 
GO  TO  110 

IF  (RATE. GT. 7.0)  GO  TO  80 
IF  (Rl.LT.0.2)  GO  TO  70 

IF  (Rl.LT.0.4)  GO  TO  60 

SEE  l=C7 
GO  TO  110 
SEE 1=C6 


CNOOOUlt 
CN000020 
0025, OCNO 00 030 
CN000040 
CN000050 
CN000060 
CN000070 
CN000080 
CN000090 
CNOOOIO  J 
CN0001 1 J 
CNOOO 120 
CN000130 
CNOOO 140 
CNOOO 1 50 
CNOOO 160 
CNOOO 170 
CNOOO 1 80 
CN000190 
CN000200 
CN000210 
CN0U0220 
CN000230 


GO  TO  110 
SEE l=C5 
GO  TO  110 

IF  (Rl.LT.0.2)  GO  TO  100 

IF  (Rl.LT.0.4)  GO  TO  90 

SEE1=C10 

GO  TO  110 

SEE1=C9 

GO  TO  110 

SEE  1  =  C8 

ET  A  1=  AT  1 

DADN=O.OOOOU1*SEE1*OELK**ETA1 

RETURN 

ENO 


CN0U0240 
CNO00250 
CNO 00260 
CN0002 7 0 
CNO 002 80 
CN000290 
CN000300 
CNO 00 J  10 
CN000320 
CN000330 
CNOOO  340 
CN000350 
CN00U360 
CN0003  7 0 
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o  o  o 


10 

20 


SUBROUTINE  COMPKL  ( DADN , R 1 , RATE ,OELK , DE K  ,DE ON  ,  MC ) 

OIMFNSION  DEK(10,20»,  0EDN(10,20),  MD(IO) 

THIS  SUBROUTINE  OEF  INES  A  CRACK  GROWTH  KATE  (OA/DN)  FOR  VARIOUS 
R  VALUES  ANO  A  GIVEN  VALUE  OF  DELTA  K.  IT  THEN  CALCULATES  A  NEW 
BOT  AND  CRACK  LENGTH. 

IMD=7 

IF  (Rl.LT.0.2)  IMD=  1 
IF  (R1.LT.0.4.AND.R1.GE.0.2)  IMD=4 
IF  (RATE. GT. 59. 9)  IMD=IMD+1 
IF  (RATE. GT. 179. 9)  IM0=IMD*1 
KK=  MD( IMD) 

00  10  1 Z  =  2*  KK 

IF  (DEK( IMD* IZ) . GE.DELK )  GO  TO  20 
CONTINUE 
I  Z  =  KK 
IY  = I Z- 1 

DK 1  =  ALOGl DEK (  IMD, 1 Y  » ) 

DK2= ALOG( OEK ( IMD, IZ ) ) 

DAl=ALUG(DEDN( IMD, IY) ) 

0A2  =  ALOGl OEDN( IMD,  IZ I ) 

D=ALOG( DELK ) 

DADN=0.000001*EXP( ( ( D-DK 1) * ( DA2-D All / ( DK2-DK 1 ) I FDA1  ) 

RETURN 

END 


CCMKOOlO 
C0MKU020 
CCMKOOlO 
CCMKOOAO 
COMKOOSO 
C0MK0060 
CCMK0070 
COMKOOBO 
C0MKO090 
CCMKOIOO 
C0MK01 LO 
CCMK0120 
CCMK0130 
CCMK0140 
CCMK0141 
CCMK0150 
CCMK0160 
C0MK01 70 
CCMK0180 
CUMKO 190 
CCMK0200 
C0MKO210 
CCMK0220 
COMK0230 
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c 

c 

c 

c 


10 

20 

C 

C 

c 


c 

c 

c 

c 


30 

40 


50 


SUBROUTINE  OUTPUT  (BLK.JOB)  0TPT001 

COMMON  SMININI IOQO),SMAXIN(  10001, C VC  INI  1000)  , CO NO (1000) ,INDEX(10)*0TPT002u 
IS MULTI  10) ,NLARS( 10) ,SMIN(  1000 ) , SMAXI 1000)  ,C YCI 1000) , OELSI  1000) , TwOOT  PT003O 
2A ( 10 ) , T ABAI  3000 , 141 , T  ABBI  14 , 6 ) , MO VE R, NC OND , MSE T S, XC VC , T , AOB , FY S , KCOT PT004 
3,KIC, SF.PHISQ, EXM( 14)  ,NTWOA  ,  JCNIT,  ALFA  ,C  ,  J  ,  I  PASS  , CRACK  ,  DEL  K,  SRAT 1 0 , OT P T00  60 
4W IDTH, B3T, ETA,  OAON,  ICHK  ,  L  IU  ,K  E  V 1 ,  KE  Y2  ,Kc  V3  ,  KE  Y4  ,  KE  Y  3  ,  KE  Y6  ,  KE  Y7  ,  K1 2  UT  P  TO  060 
COMMON  K13.K17,  ISEG(1000),RATEN( 1000) , AMI  11)  ,HUM, K14,K1 5, l PROB , RR < 0T P TOO  70 
11000)*K8»K9»K16,DtK(10»20),DEDN(10,20),MDl*  M02  ,  MO  3  ,  MD4,M05, MD6,  Mo  70TPT0O3U 
2,M0a, M09,  MO I  10) , IMD,NRTD,DDOA ,DUM1, El ,ARY1 ,DUM3 , ARY 2 , AK1 , RY1 ,RY2, KJT  P TOO 90 
3A9,KEY,K10,0RY»WET,  JW D,  KCC »  INDX  ,  I C  YC  ,  I  T  WOA ,  C  YC  TO ,  T  I  MTD  ,  I  NX  ,  AREF  ,  GMOT  PTO  100 
4AX,GMIN, PT ITLEI 3, 16), LTITLE 12,16) , L JOB, LOEC K , I  JOB , I  DECK ,K 1 1 , 1  ERR, I OT PTO 1 1 0 
RC'”‘  CT“AV  . . .  0TPT0120 


5SI 12),STMAX,STMIN,NRD,NSTCDS,XFACT, IQ  I  1000)  , NA 
THIS  SUBROUTINE  PRINTS  THE  SUMMARY  TABLES  TABA  AND  TABB. 


INTEGER 
I  P  =  0 


SF 


THE  HEADING 
LENGTHS  ARE 


FOR 

NOW 


THE  FIRST 
PRINTED. 


IF 

(MSETS 

.GT 

.7) 

I  P=  1 

IF 

(NRTO. 

EQ. 

0. OR. NRTO. 

EQ 

.2) 

WR 

IF 

(NRTO. 

EU. 

1) 

WRITE  ( 

6f 

310) 

IF 

( MSETS 

.GT 

.7) 

WRITE 

(  6 

t  33  0 ) 

IF 

(MSETS 

.LE 

.7) 

WRITE 

(6 

t  330) 

IF 

( IP.GT 

.0  ) 

GO 

TO  10 

W  R  I 

T  E  <6, 

340 

)  ( 

TWOM  1  ) 

t  I 

i=i, 

MS 

GO 

TO  20 

WRI 

TE  ( Of 

340 

)  ( 

T  WOA (  1  ) 

t  I 

i=i. 

7) 

CONTINUE 

NC  T 

=  0 

LOOP  33  E 

SS  ENT  I 

ALLY  PR 

INTS  CUT 

DO 

90  MN= 

l»  SF 

IF 

(IP.GT 

.0) 

GO 

TO  50 

TABLE  AND  THE  INITIAL  CRACK 


ITE  16,300) 

I EXMI MQ) »  MQ  =  l , 7) 

I EXMI MO) ,M0=1 .MSETS) 


THE  FIRST  TABLE. 


LOOP  39  ESTABLISHES 
TABA  FOR  ZEROS  AS  A 


THE  PRINT  INDEX 
PRINTING  STOP. 


JJA.  IT  ALSG  TESTS 


DO  30  NN= 1 , MSE T S 

IF  ITABAIMN,NN) .NE.O.O)  GO  TO  30 

IE  INN.EQ.l)  GO  TO  100 

J J A=NN- 1 

GO  TO  40 

CONTINUE 

JJA=MSETS 

WRITE  16,  350)  MN ,  ( T AB A  I MN ,N J )  ,  N J=  1 ,  J J A ) 

GO  TO  BO 


LOOP 

WHEN 


41  SERVES 
THERE  ARE 


THE  SAME  PURPOSE  AS 
MURE  THAN  7  INITIAL 


LOOP  39  BUT  IS 
CRACK  LENGTHS 


USED 


DO  60  NN= l , 7 


0TPT013D 
OT P TO  14  ) 
UTPT0160 
OT  P  TO  loo 
01 PT01 70 
OT  PTO 1 30 
OTP TO  190 
OT  PT0200 
0TPTO2 10 
OT  P  T0220 
0TPTO23O 
OT  P  T  J240 
OT  PTO/pO 
OTPTO  >c>0 
0TPT027O 
OT  PT0230 
OT  PT 02 9  0 
OT  PT03i  0 
OT  PTO  3  1  0 
OT  PTO 320 
0TPT033O 
OT  P TO 34  0 
0TPT0350 
OT  P  TO  360 
CTPT03  70 
OT  P  T  0  330 
0TPT0390 
OTPTO-tOO 
OTPTO^lO 
OTPTOhZO 
0TPT0430 
UTPT04<»0 
UTPT  0^50 
0TPT04o0 
0TPT047U 
OT  PT0430 
OT  P  T  049  0 
OT  PT 0500 
0TPT0510 
OT  P  T 0520 
0TPT053O 
0TPT0540 

or  p  r  05  5  o 

OT  P  T  0  3o  0 
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IF  <TABA( MN,NN) .NE.O.O)  GO  TO  60 

0TPT0570 

IF  (NN.EQ.l)  GO  TO  100 

0TPT0580 

J J  A  =  NN- 1 

OT  PT  0590 

GO  TO  70 

OT  PT0600 

60 

CONTINUE 

0TPT0610 

J  J  A  =  7 

OT  PT062 J 

70 

WRITE  ( 6 f 350 )  MN , ( T AB A ( MN , N J ) , N J= 1 ♦ J J A ) 

0TPT0630 

BO 

IF  (MN.LE. (45*47*NCT) )  GO  TO  90 

0TPT0640 

WRITE  (6,320) 

OT  PT 0650 

IF  ( MSETS •  GT • 7 )  WRITE  (6,330)  ( EXM( MQ I , MQ=1 , 7 ) 

OTPTO06O 

IF  (MSETS. LE. 7)  WRITE  (6,330)  (EXM(MU),MU=l,MS£TS) 

0TPT067U 

NCT  =  NCT ♦ 1 

OTPTO68O 

90 

CONTINUE 

0TPT0690 

C 

OT  PTO  700 

C 

IF  THERE  ARE  MORE  THAN  7  INITIAL  CRACK  LENGTHS 

THE 

FIRST 

OTPT0710 

C 

TABLE  IS  NOW  COMPLETED. 

OT  PTO  720 

C 

OT  PTO  730 

100 

IF  (IP)  150,150,110 

OT  PTO  740 

110 

WRITE  (6,360) 

0TPT075U 

WRITE  (6,330)  ( EXM( MQ ), MQ*8 , MSETS ) 

OT  PTO  760 

WRITE  (6,340)  (TWOA(l), 11=8, MSETS) 

OT  PTO  770 

NCT  =0 

0TPT0780 

c 

OT  P T C  790 

c 

LOOP  35  PRINTS  OUT  REST  OF  FIRST  TABLE. 

OT  PTO  800 

c 

LOOP  43  ESTABLISHES  THE  PRINT  INDEX  JJA. 

0TPT0810 

c 

OT  PT0820 

DO  140  MN= 1 , SF 

0TPT0830 

DO  120  NN=8, MSETS 

OT  PT 0840 

(TABA(MN.NN) .NE.O.O)  GO  TO  120 

0TPT0850 

IF  (NN.EQ.8)  GO  TO  150 

OT  PT 0860 

J  J  A  =  NN-  1 

0TPT0670 

GU  TO  130 

0TPT088C 

120 

CONTINUE 

OT  PT 0890 

J J  A  =  MSE  T  S 

0TPT0900 

130 

WRITE  (6,350)  MN, (TABA(MN,NJ) ,NJ=8,JJA) 

0TPT0910 

IF  (MN.LE. (45*47*NCT) )  GO  TO  140 

OT  PT 0920 

WRITF  (6,360) 

OT  PTO  930 

WRITE  (6,330)  ( EXM( MQ ) , MQ=8 ,M SET S ) 

GTPT0940 

NCT=NCT+1 

0TPT0950 

140 

CONTINUE 

OT  P  TO  960 

150 

CONTINUE 

PTPT0970 

WRITE  (6,370) 

ITPT0980 

c 

UC  PT 0990 

c 

LOOP  36  PRINTS  THE  TEST  CONDITION  IDENTIFICATIONS 

AND 

OT  PT 1000 

c 

THEIR  MULTIPLIERS. 

OT  PT 1 0  1 0 

c 

0TPT1020 

J  KL  A= I 

0TPT10J0 

DO  160  JKL= I , NCOND 

OT  PT 1040 

WRITE  (6,380)  COND(JKLA) ,SMULT(JKL) 

OT  PT 1 050 

JKLA=1+INDEX(JKL) 

OT  P  T 1060 

160 

CONTINUE 

OTP  T 1070 

WRITE  (6,390)  SF 

OT  PT 1080 

WRITE  (6,400) 

OT  PT 1090 

• 

0TPT1 100 

3 

LOOP  37  PRINTS  THE  INITIAL  AND  FINAL  CRACK  LENGTHS 

AND 

OT  PT 1 1 1 0 

C 

THE  PASS  AND  LAYER  NUMBERS  ASSOCIATED  WITH  THE 

FINAL 

0TPT1120 

188 


CRACK  LENGTH.  A  STATEMENT  IS  ALSO  PRINTED  EXPLAINING 
ANY  ABNORMAL  EXIT  ASSOCIATED  WITH  THE  FINAL  CRACK  LENGTH. 

DO  240  K J= 1 »  MSE  TS 


C 

C 

c 


170 


180 


190 

200 

210 


220 

2  30 
240 


SINCE  INDICES  WILL  BE  ESTABLISHED  FROM  COLUMNS  2  AND  3 
OF  TABB,  PROPER  ROUND  OFF  OF  THOSE  QUANTITIES  MUST  BE 
MADE  IN  CONVERTING  THEM  TO  INTEGER  VARIABLES. 


KXD=TABB(KJ,3)*0.1 

JXD=TABBIKJ,2)+0.  I 

CKACK  =  T ABBIKJ, 1  I 

BT=CRACK/(2.0*AOB*T I 

IF  (KEY1.EQ.I)  GO  TO  170 

IF  (CRACK.LT. WIDTH)  GO  TO  170 

WRITE  (6,410)  TWOAI 1 ), T ABB( KJ  ,  1 ), JXD, KXD 

GO  TO  240 

IF  (8T.LT.1.0)  GO  TO  200 
IF  (KXD.EU.O)  GO  TO  180 

IP  (KXD.6Q.JCNT .AND.JXD.EQ. SF )  GO  TO  230 

JXA=TABB(KJ,5)*0.l 

KXA=TARB(KJ ,6) +0. 1 

WRITE  (6,420)  TWO A ( 1 ) , T ABB< K J , 4) , JXA , KXA 
WRITE  (6,430)  TA3BIKJ ,1 ) , JXD, KXD 
GO  TO  240 

IF  ( JXD.EQ. 1)  GO  TO  190 
JXD= JXD- 1 
KXD= JCNT 


JXA=TABB(KJ,5)*0.l 
KXA  =  TA6B(KJ,6)*0. 1 

WRITE  (6,420)  TWOA( 1) , TABB( KJ ,4) , JXA, KXA 
WRITE  (6,430)  T ABB ( K J , 1 ) , JXD, K XD 

GO  TO  240 

WRITE  (0,440)  TW0A( l) , TWOAI 1) 

GO  TO  240 

IF  ( KXD.EQ.O )  GO  TO  210 


IF  (KXD.EQ.JCNT .AND.JXD.EQ. SF)  GO  TO  230 
WRITE  (6,450)  T WO  A ( 1 ) , T ABB( K J , 1 ) , JXD , KXD 

GO  ro  240 

IF  (JXD.EQ. 1)  GO  TO  220 
JXD=JXD-1 


KXD= JCNT 


WRITE  (6,450)  T WO A (  l ) , T ABB ( K J , 1 ) , JXO , KXD 

GO  TO  240 

WRITE  (6,460)  TWOAI 1) , T  WO  A (  1) 

GO  TO  240 

WRITE  16,470)  TWOAI  1) ,TABB(KJ,1) , JXD, KXD 
CONTINUE 


IF  (LI0.LT.10)  GO  TO  290 
I  CNT  =  0 


DO  280  J J  =  l , MSE  TS 
ICNT=ICNT*1 

IF  (ICNT.GT.l)  LIO=LI0*20 
lSFl=ITABB(JJ,2)-l)/3 
IT8  =  TABB(JJ,2)«-0.1 
WRITE  (7,480)  ITB,J0B,LI0 


UT  PT 1  130 
0TPT1140 
0TPT1 150 
OTPTlloO 
0TPT1170 

orpriiao 

OTPTl 190 
UT  PT 1 200 
0TPT1210 
OT  P T 1 220 
0TPT1230 
UTPT1240 
OTPT1250 
0TPT12C J 
OT  PT 1 2  70 
OT  P  T 12a0 
OT  P  T  1 2  y  0 
OTPTl 300 
OTPTl 310 
OT  PT 1 320 
UTPT1 330 
OTPTl 340 
0TPT1350 
OTPTl 3oO 
OTPTl 370 
OT  P  T 1 380 
01 PT 1 390 
OTPTl  -,00 
0TPT141O 
GTPTl‘,20 
0TPT143O 
OTP  T  1440 
OTPTl',  0 
OTPT 14o0 
OT  P  T 1 4  70 
OT  PT 1 4  80 
OTPTl-,90 
OTPTl 500 
OT  PT 1 5  1  0 
OT  PT 1 520 
OT  PT 1 530 
OT  P  T 1 ?40 
OT  P  T 1 3  50 
OTPTl 560 
OTPTIdTO 
0TPT1530 
OTPTl 590 
OTPTl oOO 
OT  PT 16 1 0 
OTPT 1620 
0TPT1630 
CTPTlo30 
OTPT 1660 
OTPT 1670 
0TPT16BO 
OTPT 1690 
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250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

3  70 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 


*X21f  TA8A ( 1 1 J  J )  ?X3 1 1 T  AB A( 2  *  JJ ) 


X11=0.0 

X2 1=  200.0*  BLK 
X3 1=  400.0*  BLK 
ISEQ1MPR0B 

WRITE  (7,490)  Xll,TWOA(i) 

1  JOB , L 1 0, ISEQ1 
DO  270  IJ1*1, ISF1 
IXl^I Jl*3 
I  X2=  I X 1**- 1 
MN=  I  X  2 
l  SEQ1= I SEQi  +  1 
X 1 1=  1X1  *  200.  *  BLK 
X21  =  1X2  *  200.  *  BLK 
X  3 1=  MN  *  200.  *  BLK 
IF  ( ISEQ1.LT. 10)  GO  TO  260 
IF  ( ISEQ1.GE.100)  GO  TO  250 

WRITE  (  7,490)  X 1 1 , T AB A ( I  X 1 f J J ),X21,TABA(IX2,JJ)  , X3 1 , TAB A( MN , J J ) , 
1J0B, L 10, I SEQ1 

GO  TO  270 

WRITE  (  7,  500)  X11,TABA(  I  XI , J J ) , X2 1 , TABA ( I X2  , J J )  f X3 1 , T AB A( MN , J J ) , 
1J0B,LIG, ISEQ1 
GO  TO  270 

WRITE  (7, 510)  X11,TABA( I  XI, JJ ) , X2 l , TABA ( I X2,  JJ)  ,X3 1 , T AB A ( MN , J J ) , 
1J0B,II0, ISEQ1 
CONTINUE 
CONTINUE 
CONTINUE 
RETURN 


FORMAT 

FORMAT 

FORMAT 

FORMAT 


RETARDED1 ) 

NO  RETARDATION1 ) 


i ******* 


(lHlf31Xf •CRACK  LENGTH  - 
(1H1,28X, •CRACK  LENGTH  - 
( 1H1,37X, *CRACK  LENGTH*) 

(1H  ,*  PASS  ********************************** 

l ***************** ********** • / 3X , • M  =* , 7( 5X,F5.2 ) ) 

FORMAT  (1H  , 'INITIAL  * , 6( F9. 5 , IX) , F 9. 5) 

FORMAT  (1H  , IX , I  4, 3X,  6(F9.5,1X),  F5.5) 

FORMAT  ( 1H1 , 17X, ' CRACK  LENGTH*) 

FORMAT  ( 1H1 , ' IN  SUMMAR Y , US  I NG  THE  FOLLOWING  SET  OF • , •  CONDITION 
1LT I  PL  I ERS , * //1H  , 8X ♦ *  COND I T ION • ,2X, • MUL T I  PL  I ER * / ) 

FORMAT  (1H  , 12X,A4,4X,F8.4) 

FORMAT  ( 1H0 , *  AND  A  NUMBER  OF  LAYERS  EQUAL  TO*, 15) 

FORMAT  ( 1 HO , *  THE  APPLIED  SPECTRUM  PRODUCED  THE  FOLLOWING  *,*SET 
1  CRACK  LENGTHS* // 1H0,2X, • I N I T I AL • , 5X, *F I NAL • , 4X , • P ASS  * , 2X , • LA YER ' ,0TPT2120 
24X , • NORMAL  EXIT  INTERRUPTED  BECAUSE*,*  ON  THE  •  / 1H 


OTP  T1 700 
0TPT171 
0TPT172 
0TPT1730 
OTP  T 1740 
0TPT1741 
0TPT1 750 
0TPT1 760 
0TPT1770 
0TPT1780 
0TPT1790 
0TPT180 
0TPT181 
0TPT182 
0TPT1830 
OT  PT  1840 
0TPT1850 
OT  PT 1860 
OT  PT 1870 
0TPT1880 
OT  PT 1 890 
OT  PT 1900 
OTPTi 91 
OT  P  T 1920 
0TPT19  iQ 
UTPT1940 
OT  PT 1950 
OT  PT 1 960 
OT  P T 1 9  70 
OT  PT 1980 
OT  PT 1990 
0TPT200 
OT  PT2010 
**CT  PT2020 
0TPT203O 
0TPT2040 
T  D9T205 
OT  P 12060 
MU0TPT2070 
0  'T2080 
C »  PT 2090 
C T  PT2 100 
OF  JTPT2110 


3N  OF  THE  NEXT  LAYER  ....*/) 

FORMAT  (1H  ,2F10.6, I6,I7,5X,*2A  EXCEEDED  WIDTH* ) 

FORMAT  (1H  , 2F10.6, 16,17, 5X, • B/T  EXCEEDED  1.0*) 

FORMAT  (1H  , 10X,F10.6, 16, 17, 5X, *0.9KC  HAS  BEEN  EXCEEDED*) 

FORMAT  (1H  , 2F10.6, 18X, • 0. 9KC  WAS  EXCEEDED  ON  FIRST*, *  LAYER* /1H 
FIRST  PASS*  ) 

(1H  , 2 F 1 0 • 6 ,  I6,I7,5X,*0.9KIC  HAS  BEEN  EXCEEDED*) 


FORMAT 

FORMAT 


( 1H  ,2F 10.6, 18  X, • Q.9KIC 
1 , 38 X, • OF  FIRST  PASS*  ) 

FORMAT  (1H  , 2F10«  6, 16,17) 

FORMAT  (5X, I5,56X, 16, *P* , 12,  4H0001 ) 


WAS  EXCEEDED  ON  FIRST*, •  L AYER • / 1H 


, 38X, *APPLICATI00TPT2130 
0TPT2140 
0TPT2 150 
0TPT2160 
0TPT2 1 70 
, 0TPT2 180 
0TPT2190 
0TPT2200 
0TPT2210 
OT  PT2220 
OT  PT2230 
0TPT224 
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490  FORMAT  » 3 ( F 10. 2 t F 10 . 7 ) , 6X , I  6, • P • , 12 , 2HOO . 1 2 ) 
500  FORMAT  ( 3 < F  10.2 , F  10. 7 ) , 6X , l 6 , • P ' , 12 . ' O' ,  13) 
510  FORMAT  (3(Fl0.2,F10.7),6X,Ifcf •  P  •  ,  1 2 , 3H000 , III 
ENO 


OTP  Tt  2  50 
0TPT226U 
0TPT22  70 
0TPT2280 
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c 

c 


20 


30 


SUBROUTINE  RDELK  (D.FMAX)  RDE1001 

COMMON  SM  IN  IN(  1000)  «SMAXIN(  1000) , CYC  I N( 1000)  .COND(IOOO)  ,  I  NDEX  C 10)  ,  R0EL002 
IS MULTI  10) ,NLARS( 10) ,SMIN(  1000 ) , SMAX ( 1 000) ,CYC( 1000) ,OELSC  1000) , TW0RDEL003 
2A( 10) ,T  ABAI  3000,14) ,TABB I  14 ,6 ) , MO VER , NCONO, MSE TS, XC YC , T , AOB , FY S , KCRDEL004 
3,KIC,SF,PHISQ,EXM( 14),NTW0A, JCNT,ALFA,C ,  J  ,  l PASS  ,CRACK  ,DEL K , SRAT l 0, RDEL005 
4W10TU, BUT , ET  A, DADN,  ICHK , L 10 ,K E Y l, KE Y2 ,KEY3 • KE Y4 ,KE Y5 , KE Y6 ,K£Y7 , K12RDEL006 
COMMON  K13,K17, I SEGl 1000) ,RATEN( 1000) ,AM( 1 1 ) ,HUM, K14 , Kl 5, I PR08 , RR ( ROE L007 
11000),K8,K9,Kl6,DEK( 10,20) , OEONI 10,20 ) , MO  1 , MD2 , MD3 , MD4 , MD5 , MOB , MD7R0EL008 
2  ,  MD8 , MD9,  MO  I  10) , I MD, NRTD, DDDA, OUM l , E 1 , ARY1 ,0UM3 , ARY2 , AK l , RY1 , RY2 , KRUEL009 
3A9,KEY,K10,DRY,WET, JWD.KCC, INDX , l C YC , I T WOA ,C YCTO, T I MTO  ,  INX , AREF , GMROELO 10 
4AX,GMIN,PTITLE( 3, 16) ,LTITLE (2t 16) ,L JOB , LOECK , I  JOB , I  DECK ,K1 1 , 1 F RR, I ROELO 1 1 
5S ( 12) , STM AX, STMIN,NRD,NSTCDS,XFACT, IQ11000) , NA  ROELO 12 

DIMENSION  COR (15),  FC0RI15)  R0EL013 

OATA  COR,FCOR  /O. 001,0*1,  0 .2 ,0* 3 ,0.4 ,0,5 ,0*6 ,0. 8 , 1 • 0 , 1 .5 ,2 .0 ,3 .0 , RDELO 14 
15.0,10.0,100.0,  3.39,  2.73,  2. 3, 2 .04, 1. 86 , 1 . 73, 1. 64, l .47, l . 37 , 1 . 1 8RDEL0 1 5 
2,1.06,0.94,  0.81,0.75,  0.707  / 

CR  =  CRACK/ (AOB  *  0) 

DO  20  L2=2, 15 

IF  ( CR . LE .COR ( L 2 )  )  GO  TO  30 
CONTINUE 
L2=  15 
L1=L2-1 
AC=  ALOG(CR) 

AC2= ALOG( COR (L2 ) ) 

AC1=AL0G(C0R(L1) ) 

FCR  =  FCOR(Ll)  +( (FC0R(L2)-FC0R(Ll) ) 

IF  (FCR.GT.FMAX)  FCR=FMAX 

AKMAX  =  SMAX(J)  *  FCR  *  SORT  (3.1416  *  CRACK  /(2.0  * 

AKMIN  =  SMIN(J)  *  FCR  *  SORT  (3.1416  *  CRACK  /(2.0  * 

DELK  =  ABS  (  AKMAX-  AKMIN) 

AK1= AKMAX 

IF  (AKMAX.LT. AKMIN)  AK1=AKM IN 


*( AC-AC 1 ) /  ( AC2-AC1) ) 


AOB)  ) 
AOB)  ) 


RETURN 


END 


ROELO 16 

RDEL017 

R0EL018 

RDEL019 

RDEL020 

RDEL021 

R0EL022 

RDEL023 

RDELL24 

RUEL025 

RDEL026 

R0EL0261 

RDEL027 

RDEL028 

R0EL029 

RDELOAO 

ROELO  3 1 

R0EL032 

RDEL03 i 

R0EL034 

RCEL035 
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c 

c 


c 
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SUBROUTINE  RPLAST  ( CUM3f 0DDA,ARY1 , ARY2t AK1 , E 1 .RY1 » RY2 ,0UM1) 

DOUBLE  PRECISION  DR Y1 , DDA , DDUM3 , DK, DARY 1 , DARY2 t DRY2 , DEI t D DUM1 

OF  PLATIC  FRONT  ASSOCIATED  WITH  THE  LOAD  BEING  CALCULATED  TO 

LONGEST  PLASTIC  FRONT  LEFT  BY  A  PRECEEDING  LOAD 

IF  (ARY2.LT. 0.0001)  D AR  Y2=0 • 0 

DE l 1 

DK=  AK  1 

CD A=DDDA 

DDUM3=DUM3 

IF  (ARY2.LT. 0.0001)  GO  TO  10 
B  ARY=  DD A  +  DRY  1 

IF  (BARY.GT .DARY2  )  D AR Y2=BAR Y 
CONI  INUE 

DRY1=DDUM3*DK*DK 

DARY1=DDA+DRY1 

IF  (DARY1 .GT.DARY2)  D AR Y2=D AR Y 1 
DRY  2=  DARY  2- DDA 

IF  (DRY2.NE.0.)  DDUM1=(DRY1/DRY2)**DE1 

01JM1  =  DDUMI 

RY 1  =  DRY  1 

RY  2  =  DRY  2 

ARY  L  =  DARY  1 

ARY2-DARY2 

RETURN 

END 


RPL0O010 
, BARYRPLU0020 
THE  RPL00030 
RPL00040 
RPL0OU30 
RPL0006U 
RPL00070 
RPL00G80 
RPL00090 
RPLOOlUO 
RPL00110 
RPL00120 
RPL0013i 
RPLOO 1 4  v 
RPL001S0 
RPL00160 
RPL00170 
RPL00180 
RPL00190 
RPL0O200 
RPL0021U 
KPL00220 
RPL00230 
KPL0U240 
R  PL002 1>0 
RPL002o0 
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SUBROUTINE  CRKGRO  ( DCRACK , CRACK, 0 AON , DUM1 ,A08 , RCY ,KNT ,KNT 1 ) 

CRKOOOIO 

DOUBLE  PRECISION  XCR , XDCR t XDN , XDUM, XAOB , XRC Y, XCR1 

CRK00U20 

THIS  SUBROUTINE  CALCULATES  THE  INCREMENTAL  CRACK  GROWTH  AND 

CRKOOO  30 

THE  NEW  CRACK 

LENGTH  FOR  THE  RETARDED  CRACK  CASE 

CRK00040 

XCR=XCR 1 

CRK 00050 

IF  (KNT.EQ.O) 

XCR=CRACK 

CRK00060 

IF  (KNT.EQ.O) 

XCR  1=CR ACK 

CRK00070 

KNT  =  1 

CRK00080 

X  AO  8=  AOB 

CRK00090 

XRC Y=RC Y 

CRKOOIOO 

XDN=C ADN 

CRK00110 

XDUM=DUML 

CRK00120 

XDCR=2.0*XRCY*XDN*XDUM*XA0B 

CRKO0I3O 

XCR=XCR+XDCR 

CRK00140 

IF  (KNTI.EQ.I 

)  XCR 1=XCR 

CRK00150 

OCR ACK=XDCR 

CRK00160 

CR ACK=XCR 

CRK00170 

RETURN 

CRK00180 

END 

CRK00190 

% 
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SUBROUTINE  FINLOS  FLDSGOIO 

COMMON  SMININI 1000) .SMAXINI  1000), CYC  INI  1000) ,CONO(  1000)  .INDEX! 10) .FLUS0020 
1SMULTI 10) .NLARSI 10) ,SMIN( 1000 ), SMAX U 000) ,CYC( 1000) .DELS! 1000) , TwOFLOSOJ3o 
2A( 10),  TAB A  I  3000, 14) ,TABB( 14, 6 ) , MOVER , NC OND ,MSE T S, XCYC , T , A  OB , F Y S , KCFLUS004 
3,KIC,SF,PHISQ,EXMI 14) .NTWOA.JCNT, ALFA ,C , J , I  PASS  ,CR ACK .DEL K, SRAT 1 0 , FLDSG050 
4WIDTH,B0T,ETA,DADN, ICHK , L 10 ,KE Y l , KE Y2 ,KE Y3 , KE Y4 ,KE Y5 , KE Y6 ,KEY7 , K12FL0S0060 
COMMON  K13.K17,  ISEGUOOO)  .RATENI 1000) , AMI  11)  .HUM, K1 4 , Kl 5 , I PROB , RR l FL0S0070 
11000  > ,K8,K9,K16, DEM  10,20) , DEDNI 1 0, 20 ) , MD 1 , MD2 , MD3 , MD4 , MD 5 , MD6 , MO 7FLDS008  0 
2 , MOB ,  MD9,  MD I  10) , IMO.NRTD.DDDA ,DUM 1 , E 1 , AR Y l , DUM3 , ARY2 , AK l , RY l , RY2 , KFLDS0090 
3A9,  KEY , K10, DRY, WET, JWD.KCC, INDX , I  CYC , I T WOA.C YC TO, T I MTD , INX , AREF , GMFL DSO 100 
4AX.GMIN, PT ITLEI 3,  16 > , LT I TLE I  2 , 16 ) , L JOB, LDEC K , I  JOB , I DE CK ,K 1 1 , I  ERR , I FLDSO 1 1 0 


ON  DISK  UNIT  9 


5S( 12) , STM AX, STMIN.NRD .NSTCDS, XFACT, IQ  1 1000) , NA 
C  THIS  SUBROUTINE  WILL  LOCATE  THE  CORRECT  LOADS  LIB. 

I ERR=0 

10  READ  19, END=20 )  IJOB.IDECK 

C  CHECK  TO  SEE  IF  JOB  C  OECK  NOS.  MATCH  THE  DESIRED  ONES 
IF  I  I JOB.EU.LJOB.AND. IDECK.EQ.LDECK )  GO  TO  30 
THEY  DO  NOT  MATCH, GO  TO  FIRST  CARD  OF  NEXT  LIBRARY 
READ  19) 

READ  (9) 

READ  19) 

GO  TO  10 

WRITE  16,40)  LJOB.LDECK 
I ERR=800 
REWIND  9 
RETURN 

THEY  00  MATCH  .READ  THE  LOADS  LIBRARY 
READ  19)  I  I LTITLE! I ,K  ),K  =  l,  16) , 1  =  1,2) 

NCOND, INLARSIL ) ,L=1, NCUND) , JCNT 

I  CONDI  M) ,SMlNINIM),SMAXIN(M),CYCINIM),RATENIM),M  =  l,JCNT) 


C  IF 


20 


C  IF 
30 


READ  19) 
READ  (9) 
RETURN 


C 

C 

40 


FORMAT 

END 


I'  THE  FOLLOhING  LOADS  LIBRARY  IS  NOT  LOAOE D • / 10X , 2  1 8 ) 


FLDSO 120 
FL060130 
FLOSO 14u 
FLDS0150 
FLOSOloO 
FL0S0170 
FLDSO 180 
FLDSO 190 
FL0S0200 
FLDS0210 
FLDS0220 
FLUS02 30 
FL0S0240 
FLDS023O 
FLDS0260 
FLOSO270 
FL0S0280 
FLDS0290 
FLOSO 300 
FLDS0310 
FLDS0320 
FLDS0330 
FLDS0340 
FLOSO  350 
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c 

c 

c 

c 

c 

c 

c 


10 

20 


30 

40 


c 

c 


SUBROUTINE  RLOAOS  RlQSOOIO 

COMMON  SM IN  INI  1000) , SMAXINI  1000) »CYC INI  1000) »CONO 1 1000)  , I NOEX 1 10) , RL0S0020 
ISMULT  (  10  )  ,NL  ARSI  10)  ,SMIN(  1000) ,  SMAXI 1000)  ,CYC(  1000)  ,  DEL  SI  1000)  ,  TW0RL0S0030 
2AI 10),TA8A( 3000,14) ,TABB(  14 , 6 ) , MO VE R, NCONO , MSET S, XC YC , T  ,A06 , FT S , KCRL0S004 
3»KIC*SF,PHISQ,EXM(14) , NTWOA , JCNT , ALFA ,C , J , I  PASS , CRACK , OEL K, SRAT 10 , RL0S0050 
4WI0TH,B0T,ETA,DADN, ICHK»LI0»KEY1,KEY2»KEY3,KEY4*KEY5*KEY6 ,KEY7 , K12RLDS0060 
COMMON  K13.K17, IS  EG 1 1000) ,RATENI 1000) ,AM(  11 )  ,HUM, K14, K1 5, I PROB , RRI RLDSOO 70 
11000) ,K8, K9,K IS, DEM  10,20), DEDN( 10,20) , MD l ,M02, MD3 , MD4 , MO  5 , MD6 , MD7RLDS0Q80 
2»MD8, MU9, MD( 10) , IMO,NRTD,DDDA ,DUMI,E1 , ARY  1 ,DUM3 ,ARY2 , AK1 , KYI , RY2 , KRL0S0090 
3A9,KEY,K10,DRY,WET, JWD.KCC, INDX, I  CYC, I T WOA ,C YCTD , T l MTO , I  NX , AREF .GMRLDSO 100 
4AX,GMIN,PTITLE(3*16),LTlTLE(2»16)»LJOB»LDECK»IJ08»lDECK»Kli,IERR»IRLDS01l0 

5S ( 12 ) , STM AX, STM IN,NRD ,NSTCDS, XFACT, IQ (1000) ,NA 
THIS  SUBROUTINE  READS  THE  LOADS  LIBRARIES  AND  STORES  THE  DATA 
ON  DISK  UNIT  9 
I JOB= I S I  1 ) 

I OECK= I S ( 3 ) 

WRITE  (6,50)  I  JOB, I  DECK 
READ  (5,60)  (PT ITLEI2, I ) ,1=1, 16) 

JT  =  JCNT 

WRITE  (9)  I  JOB,  IDECK 

READ  (5,70)  NCOND, (NLARSt I ) ,I=1,NC0ND) 

EACH  OF  THE  SPECTRUM  ARRAYS  IS  LIMITED  TO  3000  ELEMENTS. 

A  CHECK  IS  NOW  PERFORMED  ON  THAT  DIMENSION. 


THE  SPECTRUM  IS  NOW  READ  IN.  CONDITION  IDENTIFICATION 
IS  STORED  IN  CONO(I),  STRESSES  ARE  STORED  IN  INITIAL 
ARRAYS  SM IN  IN ( I )  AND  SMAXIN(I),  INITIAL  CYCLES  ARE 
STORED  IN  CYC  IN (  I  ). 

JCNT  =  0 

DO  20  1=1, NCOND 
INDEX ( I )=JCNT+NLARS ( I ) 

JCNT  = INDEX ( I ) 

IF  ( 3000- JCNT )  10,20,20 
WRITE  (6,80) 

CALL  EXIT 
CONTINUE 
K4=  1 

DO  40  L=l, NCOND 
KB= INDEX ( L ) 

DO  30  I =K  A, KB 

READ  (5,90)  COND ( I ) ,SMIN INI l),SMAXIN( I) ,CYCIN(1),RATEN( I) 

CONTINUE 

KA=KB+l 

CONTINUE 

WRITE  (9)  (  (P.TITLEI  I,K)  ,K  =  1  ,  16)  ,1=1,2) 

WRITE  (9)  NCOND, ( NL AR S ( L ) , L =1 , NCOND), KB 

WRITE  (9)  ( COND ( M  ), SM ININ (M ), SMAX IN ( M ) , C YC I N ( M ) ,RATEN(M),M=1,KB) 

RETURN 


50 

FORMAT 

(■  I  JOB  =  ',  18, 4X, • IDECK  =',I4) 

60 

FORMAT 

(  16A4) 

70 

FORMAT 

(1115) 

80 

FORMAT 

(  1H0 , '  THE  MAXIMUM  NUMBER  OF  LAYERS  HAS  BEEN 

RLDS0120 

RLDS01J0 

RLDS014U 

RL0SU150 

RLDS016D 

RLDS0170 

RL0S0180 

RLDS0190 

RLDS0200 

RLDS0210 

RLDS022  0 

RLDSC‘30 

RLDS0240 

RLDS0250 

RLDS02  oO 

RLDSU270 

RLDSU280 

RLDS029D 

RLDS03D0 

RLDS0J1U 

RLDS032 

RLDS033L 

RLDS0340 

RLDS0350 

RLDS0360 

RL0S0370 

RLDS0380 

RLDS0390 

RL0S0400 

RLDS0410 

RL0S0420 

KL0SU430 

RL0S0440 

RLDS0450 

RLDS046U 

RLDS0470 

RLDSJ480 

RL0S0490 

RLDS0500 

RLDS0510 

RLDS0520 

RLDS0530 

RLDS0540 

RLDS0550 

RLDS0560 
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1EXCEEDEU. • / 1H  » ' THE  PROBLEM  HAS  BEEN  TERMINATED.') 
FORMAT  ( A4,2F8.0,FIO.O, IOX, F10.0) 

END 


RLDSU5/U 

RLDS058U 

RLDS0590 
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20 


30 


40 


SUBROUTINE  PLOTR  PL0TU010 

COMMON  SMIN  1 N (  1000  )  ,  S MAX  I N(  1000) ,CYCI N(  1000)  ,CONO(  1000)  ,1  NOEXUOI  ,  PL0T002U 
1SMULTI 10 ) • NL  ARS ( 10) , SMIN ( 1000 ) , SM AX 1 1 000) , CYC (1000) ,OELS<  1000) , TWOPLOTOOJO 
2A( 10) ,TA8A(  3000 , 14) , TABS ( 14,6) , MO VER , NC UNO , MSE  T S , XCYC , T ,AOB ,FYS ,KCPLOT004 
3,KIC,SF, PH  ISO, EXM( 14) ,NTWOA, JCNT, ALFA, C , J, I  PASS, CRACK, DECK, SRAT 10, PL0T005J 
4W IDTH, BOT ,ETA,OAON,  ICHK , L 10 ,K E Y 1 , KE Y2 , KE Y3 , KE Y4 , KE Y5, KE Y6 , KE Y 7 , Kl 2 PL  1T0060 
COMMON  K13.K17, ISEGl 1000) ,RATEN(  1000)  ,AM( 11)  ,HUM, K14 , Kl 5 , I PROB , RR( PLUT007 0 
11000) ,K8,K9,K16,DEK( 10,20 ),DE0N( 10,20) ,MD1, MD2,M03,M04, MD 5, M06, MO 7PL0T0080 
2, MOB , MD9, MO ( 10) , l MO,NRTD , DDDA ,DUM1 , E 1 » ARY l ,DUM3 , ARY2 , AK l , RY l , RY2 , KPL JT0090 
3A9,KEY,K10*  DRY , WE  T, JWD,KCC, INDX, I  CYC, I TWOA.C YCTO, T I MTD  ,  I NX , AREF .GMPLOTO 100 
4AX,GMIN, PT I  TIE ( 3, 16 ) , LT I TLE ( 2 , 16 ) , L JOB, LDECK , I  JOB , I  DECK ,K1 1 , l ERR, I PLOTOllO 


5S( 12  ) , STMAX, STMIN,NRO,NSTCOS, XFACT , IQ (1000) ,NA 

PLOT0120 

DIMENSION  CPNAME ( 12 ) ,  MP ( 14 ) 

PL0T0130 

EXTERNAL  TABL1V 

PL0T0140 

I  ERP-  =  0 

PLUTO  1 30 

CKMX=0 

PLUT  0160 

XN=8 .0 

PLOTOibl 

on  10  1=1, MSET  S 

PL0T017 J 

MNP  =  T  ABB( I , 2 )- l 

PLQT0180 

MP(  I  ) =MNP 

PL0T0190 

C  KM  =  T  AB A ( MNP , I ) 

PLOT0200 

IF  (CKMX.LT.CKM)  CKMX=CKM 

PLUT  0210 

CONTINUE 

PL0T0220 

MNP=MP ( l) 

PL0T0230 

XL  =  0 .0 

PLQT0240 

XR=MNP 

PL0T0250 

Y  B  =  TWO A ( l) 

PLOT  026U 

YT  =CKMX 

PLOT02 70 

CALL  STOPTV 

PLOT  0280 

CALL  BRITEV 

PLOT  0290 

CALL  CAMRAV  (9) 

PL OTO  300 

CALL  DXUYV  ( 1 , XL , XR ,DX , N , I , NX , XN , IERR ) 

PLJT0J10 

IF  ( IERR.NE .0)  GO  TO  20 

PLOT  0  320 

CALL  DXDYV  l 2 , YB , YT ,0Y, M , J , NY, XN , IERR ) 

PLUTO  3 30 

IF  (IERR.EQ.O)  GO  TO  30 

PLUT  0  340 

WRITE  (6,80) 

PL0T0350 

RETURN 

PLOT U  360 

CONTINUE 

PL  OTO 370 

CALL  GPIDIV  (  1,XL»XR,YB,YT,DX,DY»N»M, I, J, NX, NY) 

PL  OTO  38  0 

CALL  CHS l ZV  (3,3) 

PLOT  039  U 

CALL  RITE2V  ( 300,  10 , 1 02 3 , 90 , 1 , 16,  1 , • NUMBE R  OF  BLOC KS'  ,  NLA  ST ) 

PLOT0400 

00  40  KK= 1,12 

P-QT0410 

CPNAME(KK)=PTITLE(1,KK) 

PLOT0420 

CONTINUE 

PLUT0^30 

CALL  RITF2V  ( 50 , 10 1 1 ,  1023, 9C, 1 , 48 , 1 , CPNAME , NLAS T ) 

PL0TU440 

CALL  KITE2V  ( 10 , 250, 1023 , 180, 1 , 21 , 1 , • CRAC K  LENGTH  (INCHES)', 

NL AST ) PLOT  0450 

KH=60*( MS  ET  S*26 ) 

PL0T046  0 

CALL  CHS  I ZV  (2,2) 

PL0T0470 

00  50  L2=l,MSETS 

PLOT  0480 

KH=KH-26 

PLOT  0490 

MARK=  16+-L2 

PL0T050 0 

IF  (MARK. GT. 25)  MARK=MARK+7 

PLUT031 0 

CALL  PLOT V  (826, KH, MARK) 

PL0T0320 

CALL  PLOTV  (826, KH, MARK) 

PL0T0530 

CALL  RITE2V  ( 880 , KH, 102 3 , 90 ,2 , 3 , 1 , ' M  =',NLAST) 

PLOT  0540 

EMXP=FXM(L2) 

PL0T05  5  0 
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CALL  LABLV  ( EMXP f 952, KH , 4 , 2 ,2 ) 
50  CONTINUE 

OD  70  L  2=  l»  MSET S 
J  5N0P=MP ( L  2  ) 

XP1  =  0 

YP 1=TW0A( 1) 

XP2-  1 

YP2=TABA( 1,L2) 

NXl=NXV (XP1 ) 

NY  L=NYV (YP 1  ) 

NX2=NXV (XP2 ) 

NY2=NYV(YP2) 

CALL  L I N6V  (NX1«NY1«NX2»NY2) 

00  60  J=2» JENDP 
XP  3=J 

YP3=TABA< J, L2) 

NX  1  =  NX2 
NY  1  =  NY2 
NX2  =  NXV  <  XP3 ) 

NY2  =  NYV ( Y  P  3 ) 

CALL  LINEV  ( NX  1 , N Y 1 ,NX2 , N Y2 ) 

60  CONTINUE 

MARK  =  16+L2 

IF  (MARK. GT. 25)  M  ARK=MARK«-7 
CALL  PLOT V  (NX2.NY2.MARK) 

CALL  PLOTV  ( NX2  »NY2 .MARK ) 

70  CONTINUE 

RETURN 


80  FORMAT  (•  THIS  GRID  IS  IMPOSSIBLE 
END 


PLOT  0560 
PLOT 05  7 0 
PLUTU580 
PLOT  0590 
PL0TU600 
PLOT  06 1 0 
PLOT  0620 
PL0T0630 
PLOT  0640 
PLOT  0650 
PLOTU06G 
PL0T067 J 
PLUT0680 
PL0TG690 
PLOT;  700 
PLOTO  710 
PLOT 0  720 
PLOT  0730 
PLOTO  740 
PLOTO750 
PLOTO  760 
PL0T077O 
PL01 0760 
PLOT  0  790 
PL  TT 0  300 
PL  >T0610 
PLOT  0820 
PLUT0830 
PLOT  00  >0 
PLOTO  150 

TO  PLOT  • )  PLOTO  16  0 

PLOTO  0 
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c 


10 


20 

30 


40 

50 


60 

7  0 

80 

C 


90 


SUBROUTINE  RANGEN  (KR1.KR2)  RAND0010 

COMMON  SMI N IN  11000) .SMAX INI  1000) ,CYCIN( 1000) .CONDI  1000) , INOEXI 10) , RAND0020 
IS MULT  I  10) .NLARSI 10) .SMINI  1000 ), SMAXI 1000) ,CYC( 1000) .DELS! 1000) , TW0RAND0030 
2AI 10) .T  ABA  I  3000 ,14) .TABBI 14 , 6 ) , MO VER . NCOND, MSET S, XC YC , T .AOB.FYS. KCRAND004 
3»KIC»SF,PHISQ»EXM(14I »NTWOA .JCNT.ALFA.C , J ,1  PASS .CRACK ,DEL K, SR  AT  1 0 , RAND0050 
4WtpTH,B0T,ETA,DADN,  ICHK , L 10 ,K EY 1 , KE Y2 ,KE Y3 , KE Y4 , KE Y5 , KE Y6 ,KEY7 , K12RAND0060 
COMMON  K13.K17,  IS  EG!  1000)  .RATENUOOO)  .AMI  11)  .HUM,  K 14 ,  K1 5 ,  I PROB ,  RR I RANDOO  7  0 
11000) .K8.K9.K 16.DEK 1 10,20 ),DEDNI 10,20) , MD1 , MD2 , MD3 , M04 , MO  5 , M06 , MD7RAN00080 
2.M08.M09, MOI 10) , I MD ,NRTD , DOOA ,DUM l , E 1 , ARY  1 ,DUM3 , ARY2 , AK1 , RY 1 , KY2 , KRAND0090 
3A9,KEY,K10,DRY, WET, JWD.KCC, INDX , I  CYC, I T WOA ,C YCTD, T I MTD , INX , AREF ,GMRAND0100 
4AX,GMIN,PTITLE(3,16),LTITLE(2,16) , L JOB, LOEC K, I  JOB , I  DECK ,K 1 1 , I  ERR, I K ANDO  1 10 


5SI  12),STMAX,STMIN,NR0,NSTCDS,XFACT, IQ  1 1000) , NA 

RAND0120 

THIS  SUBROUTING  PUTS  INPUT  LOADS  IN  RANDOM  ORDER 

RANDO 130 

IF  (NSTCDS.EQ. 1 )  CALL  RINT  (KR1.KR2) 

RAN00140 

DO  30  1=1, JCNT 

RAND0150 

CALL  RAND  IU) 

RANU0160 

ISEGI I )=ABS(U*I JCNT+l ) ) 

RAND0170 

IF  I ISEGI I J.GT.JCNT.OR.ISEGII I.LT.l)  GO  TO  10 

R  A  M  00  1 8  0 

IF  I I.EQ.l)  GO  TO  3C 

R ANDO 190 

JA=  1-1 

RAND0200 

DO  20  K=  1 ,  J  A 

KAND0210 

IF  (ISEGI  O.EQ.ISEG(KI)  GO  TO  10 

RAND0220 

CONTINUE 

RAND023U 

CONTINUE 

RAN00240 

WRITE  16,110) 

RAND0230 

IF  IKEY3.EQ.0)  GO  TO  40 

RAND0260 

WRITE  16,120) 

RAND0270 

GO  TC  50 

RAN00280 

WRITE  16,130) 

RAND0290 

CONT INUE 

RANDJ300 

KAT=45 

RAN00310 

DO  80  1=1, JCNT 

RAN0032 

L=  I SEGI I ) 

RANC0330 

WRITE  16,140)  SMININI  I  ),SMAXINI I) ,CYC INII  ),RATEN(I)  .SMINIL) 

,  SMAX( LRAN00340 

1) ,CYCIL),RATEN(L),DELS(L),L 

R ANDO  330 

IF  I  I  .LT.KAT )  GO  TO  80 

RAN00360 

WRITE  16,110) 

RAN003  7  0 

IF  (KFY3.EU.0)  GU  TO  60 

RAN 00  380 

wRITF  16,120) 

RAN00390 

GO  TO  70 

R ANC0400 

WRITE  16,130) 

K AN 004 1 0 

K AT =KAT ♦45 

R AND042  0 

CONTINUE 

R AND0430 

CONTINUE 

R AND0440 

IF  (KEY4.E0.3)  GO  TO  100 

RAND0450 

N=l 

R ANC0460 

WRITE  17,150)  ILTITLEI1,K),K=1,16),N 

KAN00470 

N  =  N  + 1 

RAND0480 

WRITE  17,150)  ILTITLEI2,K),K=l,16),N 

RAN DO 4 90 

N=N+  l 

RAND0300 

WRITE  17,160)  JCNT , N 

RAND0510 

DO  90  1=1, JCNT 

RAN00520 

N=N+  l 

RAND0330 

L  =  I  S  E  G I  I ) 

RAND034U 

WRITE  (7,170)  CONDI L ), SM INI L) , SMAXI L) ,CYC ( L ) ,RATENIL)  ,L  ,N 

RAND0530 

CONTINUE 

RAND056  0 

200 


100 

c 

no 

120 

130 

140 

150 

160 

170 


CONTINUE  KANOO  5  70 

RETURN  RAN00580 

RAND0590 

FORMAT  ( IH1 »  13X» ' AS  READ* ,29X, • AS  RE ARRANGED •/ 1 X , 32 (•*•), 3X ,42 ('*' KAN0060U 
11)  KAN00610 

FORMAT  (•  SMEAN  SALT  CYCLES  RATE  SMIN  SMAX  CYCLERAND0o20 

IS  RATE  DEL  S  LL'//1  RAND0630 

FORMAT  (•  SMIN  SMAX  CYCLES  RATE  SMIN  SMAX  CYCLERANC0640 

IS  RATE  DEL  S  LL*//»  RAND0650 

FORMAT  <IX,2F8.2,F9.1,F7.1,2F8.2,F9.1,F7.1,F8.2,15)  KANC0&60 

FORMAT  ( 16A4tllXt  14)  KAND0670 

FORMAT  ('  1*  , I5.65X,  14)  RAND0680 

FORMAT  (A4,2F8.3,F10.3, 10X.F10.2, 110,15X,I4)  RAND0691 

END  R ANDO  700 
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INSTRUCTIONS  TO  CUSTOMER 
IBM  360  PROCEDURE  TD9 


I .  PROGRAM  PURPOSE 

Procedure  TD9  calculates  the  crack  propagation  as  a 
function  of  stress,  environment,  and  material  properties.  The 
loading  spectra  are  input  as  library  data,  and  the  environmental 
data  and  material  properties  of  the  structural  member  are  input 
as  problem  data. 

II.  PRODUCTION  SERVICE 

The  steps  to  follow  for  having  problem  solutions  run  on 

«-  ~ -C  r*  * - 1  T>- - 4 

k.  L  LW  UWiL  U  k  bilk.  1  Vii  k  II  Vi.  bit  JL.  V  JLV  JLk/li  k/ J.  Uk>  Uk.  4.  li  JL  i^JT  iimUXCO  Ci  i.  k. 

described  in  the  document  "Utilization  of  Digital  Computing 
Laboratory  Production  Services."  In  general  three  items  are 
required  to  obtain  this  service:  (1)  production  authorization, 
(2)  job  sheet,  and  (3)  data  tabulation. 

III.  INPUT  DATA 

Input  data  shall  be  tabulated  on  standard  80-column  data 
sheets.  Columns  67-79  of  each  card  must  be  tabulated  in  the 
following  way.  Columns  67-72  will  contain  a  6  digit  job  number 
which  can  be  obtained  from  the  computing  laboratory  at  the  time 
the  job  is  submitted.  Column  73  will  contain  either  the  letter 
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P  or  the  letter  L  depending  on  whether  the  deck  is  a  problem 
or  library  deck.  Columns  74-75  contain  the  deck  number  and 
columns  76-79  contain  the  sequence  number  of  each  card  within 
a  deck.  The  first  card  of  each  deck  must  have  0001  in  these 
columns,  and  each  card  thereafter  must  be  numbered  sequentially. 

Description  of  the  input  data  to  be  punched  on  each 
card  is  given  in  the  following  section.  Input  quantities  must 
be  in  the  columns  noted.  A  quantity  entered  as  a  real  number 
must  contain  a  decimal  point.  Integer  quantities  must  not 
contain  a  decimal  and  must  be  entered  right-adjusted  in  their 
designated  columns.  Unless  otherwise  noted  variables  beginning 
with  I-N  are  integers  and  all  others  are  real. 

A.  Library  Deck 


Card  Type  One 


Column 


Variable 


Definition 


1-60 


TITLE 


60  alphanumeric  characters 
used  to  describe  the  loads 
spectrum. 


Note:  Two  (2)  cards  of  card  type  one  will  be  input  for 
each  library. 


Card  Type  Two 


Column 


Variable 


Definition 


1-5 


NCOND 


Number  of  conditions  in 
library  (10  maximum) 
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Column 

Variable  Definition 

6-10 

NLARS(l)  The  number  of  layers  or  load 

11-15 

NLARS(2)  levels  for  each  condition 

(1  to  10  conditions)  (integers) 

51-55 

NLARS(IO) 

Column 

Card  Type  Three 

Variable  Definition 

1-4 

COND(I)  4  alphanumeric  characters  may 

be  used  to  identify  condition 

5-12 

SMININ(I)  Minimum  load  or  mean  load 

depending  on  whether  library 
is  min-max  or  mean-alternating 

13-20 

SMAXIN(I)  Maximum  load  or  alternating 

load  depending  on  whether 
lihrarv  is  min-max  nr  mean- 
alternating 

21-30 

CYCIN(I)  The  number  of  applied  cycles 

of  the  particular  load  level 

31-40 

TIMEIN(I)  The  amount  of  time  in  minutes 

that  a  static  load  is  maintained 

41-50 

RATEN(I)  The  rate  at  which  cyclic  loads 

are  applied  in  cycles  per 
minute . 

Note:  Card  type  three  (3)  will  be  repeated  until  one  card 

has  been  read  for  each  layer  of  each  condition. 
(2000  cards  maximum) 

Problem  Deck 


Card  Type  One 

Column 

Variable  Definition 

1-60 

PTITLE  60  alphanumeric  characters 

used  to  describe  the  problem 

Note:  Three  (3)  cards  of  card  type  one  will  be  input  for 
problem  identification  204 


Card  Type  Two 


Column 

Variable 

Definition 

1-2 

KEYl 

(KEYl  =  0)  A  finite  width  plate 
(KEYl  =  1)  An  infinite  width  plate 

3-4 

KEY  2 

(KEY2  =  0)  No  preload 

(KEY2  =  1)  Proof  test  preload 

entered  prior  to  spectrum  application 

5-6 

KEY3 

(KEY3  =0)  Minimum  and  maximum 
loads  in  library,  (KEY3  =1) 

Mean  and  alternating  loads  in 
library 

7-8 

KEY4 

(KEY4  =  0)  Loads  applied  in 

sequence  as  input,  (KEY4  =  1) 

Dels  (max-min)  Loads  arranged  in 
ascending  order,  (KEY4  =  2)  Dels 
(max-min)  Loads  arranged  in  de¬ 
scending  order,  (KEY4  =  3)  Loads 
applied  in  random  order,  (KEY4  =  4) 

Loads  applied  in  rtimiuiu  utuei  and 

new  library  is  punched. 


9-10  KEYS 


11-12  KEY6 


13-14  KEY 7 


(KEYS  -  0)  Intermediate  output  will 
Print  calculations  for  each  layer 
(KEYS  =  1)  Normal  output 

(KEY 6  =  0)  General  Dynamics  Mk 
curves  used,  (KEY6  =  1)  Boeing  or 
other  Mk  data  must  be  entered  (see 
card  type  15  ),  (KEY6  =  2) 

Boeing  Mk  data  for  a/2C  =0.5  will 
be  used  automatically 

(KEY7  =  0)  507o  humidity  and/or  JP4 

(KEY7  =  1)  907»  humidity  and/or  JP4 

(KEY7  =  2)  507o  humidity  and/or  dis¬ 

tilled  water,  (KEY7  =  3)  907„  humidity 
and/or  distilled  wat  ;r 
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Card  Type  Two  (cont'd) 


Column  Variable 

15-16  K8 

17-18  K9 


19-20 

K10 

21-22 

Kll 

23-24 

K12 

25-26 

K13 

27-28 

K14 

29-30 

K15 

31-32 

K16 

De finition 


(K8  =  0)  One  environment  used  in  this  problem, 
(K8  =1)  Percentages  of  wet  and  dry  environ¬ 
ment  used,  (K8  =  2)  Percentages  of  wet,  dry 
humidity  environment  data  used. 

(K9  =  1)  Dry  dadn  data,  (K9  =  2)  Dadn  vs 
delta  k  data  must  be  input  for  3  stress 
ratios  and  3  cyclic  loading  rates,  (K9  =  3) 
Humidity  dadn  data,  (K9  =  4)  Regular  JP4 
or  distilled  water  dadn  data  used,  (K9  =  5) 
Other  dadn  data  must  be  read  (see  card  types 
13  and  14) 

(K10  =  0)  Basic  delta  k  equation  used, 

(K10  =■  1)  Data  read  to  modify  delta  k  for 
a  crack  initiating  in  a  hole  (see  card  type  12) 

(Kll  =  0)  Basic  loads  used,  (Kll  =  1)  Stress 
gradient  will  be  read  for  stress  as  a  func¬ 
tion  of  crack  depth  (see  cary  type  3) 

(K12  ■  0)  Basic  loading  order,  (K12  »  1) 

First  ILR  load  levels  will  be  repeated  NPAS 
times  in  each  pass  (see  card  type  7) 

(K13  =  1)  Printed  output,  (K13  =  2)  Micro-  > 
film  output,  (K13  =  3)  Printed  &  microfilm 
output 

(K14  ■  0)  Basic  loading  order,  (K14  =  1) 

Make  up  flight  beginning  load  levels  will 
be  entered  for  make  up  flights  2,  3,  and  4. 

One  make  up  flight  will  be  applied  at  the 
end  of  each  pass  (see  card  type  6) 

(K15  ■  0)  No  plots,  (K15  =  1)  Output  will 
be  plotted 

(K16  ■  0)  1  Set  of  stress  factors  for  multiple 
conditions,  (K16  =  1)  1  Condition  with  MSETS 
different  stress  factors  and  crack  growth 
curves . 
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Card  Type  Two  (Cont'd) 


Column 

33-34 

35-36 

Column 

1-6 

9-10 

11-20 

21-30 

31-40 

41-50 

51-60 

Column 

1-10 

11-20 

21-30 


Variable 


Definition 


K17  (K17  =  0)  Basic  procedure) 

(K17  =  1)  Alternate  randomizations 
obtained  for  each  MSETS  (KEY4  must 
be  3  or  4) 

K18  (K18  =  0)  Plane  strain  (Pf-f(6  PI) 

(K18  =  1)  Plane  stress  (Pf*f(2  PI) 
Pf  *  retardation  plastic  front 


Card  Type  Three 

Variable  Definition 


UOB 

LDECK 

T 

TWOA  (1) 
STMAX 

STMIN 

WIDTH 


Job  number  of  loads  library  to  be 
used  in  this  problem. 

Deck  number  of  loads  library  to  be 
used  in  this  problem. 

Thickness  of  part 

Initial  crack  length 

Maximum  stress  factor  for  stress 
gradient  case  (used  when  Kll  =  1) 

Minimum  stress  factor  for  stress 
gradient  case  (used  when  Kll  =  1) 

Part  width  if  finite 


Card  Type  Four 


Variable 

AOB 

PHISQ 

DRY 


Definition 


Half  of  crack  surface  length 
divided  by  crack  depth 

Phi  squared  -  a  constant  which  is 
a  function  of  crack  shape 

Portion  of  time  dry  environment  is 
used  for  multiple  environment  case 
(K8  =  1  or  2) 
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Card  Type  Four  (Cont'd) 


Column 

Variable 

Definition 

31-40 

WET 

Portion  of  time  water  environment 
is  used  for  multiple  environment 
case  (K8  **  1  or  2) 

41-50 

HUM 

Portion  of  time  humidity  environ¬ 
ment  is  used  for  triple  environment 
case  (K8  =  2) 

51-60 

NRTD 

(NRTD  =  0)  Retardation  used 

(NRTD  =  1)  No  retardation 

(NRTD  =  3)  Cycle  by  cycle  analysis 

Card 

Type  Five 

Column 

Variable 

Definition 

1-10 

FYS 

Yield  stress  in  ksi 

11-20 

RKC 

Stress  intensity  cutoff  (.9  KC 
causes  problem  to  terminate) 

21-30 

RKIC 

Stress  intensity  cutolf  (.9  KJC 
causes  problem  to  terminate) 

31-40 

CYCTD 

Cyclic  delta  k  threshold  (no  crack 
growth  below  this  level) 

41-50 

TJMTD 

Static  load  delta  k  threshold  (r 
crack  growth  below  this  level) 

51-60 

BLK 

Block  factor  for  punched  output 

BLK  =  block  hours/200 

Card 

Type  Six 

Column 

Variable 

Definition 

1-10 

XCYC 

Cyclic  multiplier 

11-15 

ISF 

Number  of  passes  or  applications 

of  loads  spectrum  (1000  maximum) 
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Card  Type  Six 

(Cont 'd) 

Column 

Variable 

Definition 

16-20 

LIO 

Problem  number  on  cards  if  punched 
output  is  obtained  (punched  when 

> 

10  <  L10  <  100) 

21-25 

IPROB 

Sequence  number  on  first  card  if 
punched  output  is  given 

26-30 

M2 

First  load  level  of  make-up  flight 

2  (used  when  K14  =  1) 

31-35 

M3 

First  load  level  of  make-up  flight 

3  (used  when  K14  =  1) 

41-50 

RESID1 

Residual  stress  in  ksi 

51-60 

RESID2 

Residual  stress  in  ksi  for  stress 
gradient  case  (if  gradient  is  used 
RESID1  must  be  0) 

61-66 

JOB 

Job  number  punched  on  output  cards 

Card 

Type  Seven 

Column 

Variable 

Definition 

1-5 

MSETS 

Number  of  different  retardation 
factors  to  be  used 

6-10 

NPAS 

Number  of  times  first  ILR  loads  to 
be  repeated  (used  when  K12  =  1) 

11-15 

ILR 

Number  of  load  levels  to  be  repeated 
NPAS  times  (must  be  the  first  load 
levels  in  spectrum  and  used  when 

K12  =  1) 

21-30 

DIA 

Hole  diameter  for  Bowie  model  crack 
in  a  hole  (used  when  K10  =  2) 

31-40 

FAC  DA 

Constant  factor  to  be  applied  to 
da/dN  data 

41-50 

FMAX 

Maximum  concentration  factor 
allowed  with  Bowie  model. 

209 


Card  Type  Eight 


Column 

Variable 

Definition 

1-10 

SMAX 

Preload  stress,  ksi  (entered  if 

K2  =  1) 

NOTE: 

If  (KEY2  =  0)  card 

type  eight  (8)  is  omitted. 

NOTE: 

Card  types  nine  (9) 
are  used  only  when 

,  ten  (10),  and  eleven  (11) 

(K9  =  2). 

Card  Type 

Nine 

Column 

Variable 

Definition 

1-5 

MDl 

Number  of  data  points  on  da/dn  vs 

K  curve  for  stress  ratio  less 
than  .2  and  6  cpm  data 

6-10 

MD2 

Number  of  data  points  on  da/dn  vs 

K  curve  for  stress  ratio  less 
than  . 2  and  60  cpm  data 

11-15 

MD3 

Number  of  data  points  on  da/dn  vs 

K  curve  for  stress  ratio  less 
than  .2  and  180  cpm 

16-20 

MD4 

Number  of  data  points  on  da/dn  vs 

K  curve  for  stress  ratio  .  2£ 
R<.4  and  6  cpm  data 

21-25 

MD5 

Number  of  data  points  on  da/dn  vs 

K  curve  for  stress  ratio  .2^ 
R<.4  and  60  cpm  data 

26-30 

MD6 

Number  of  data  points  on  da/dn  vs 

K  curve  for  stress  ratio  .2^ 
R<.4  and  180  cpm  data 

31-35 

MD7 

Number  of  data  points  on  da/dn  vs 

K  curve  for  R  <>  .4  and  6  cpm  data 

36-40 

MD8 

Number  of  data  points  on  da/dn  vs 

K  curve  for  R  .4  and  60  cpm 

data 
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Type  Nine 

(Cont' d) 

Column 

Variable 

Definition 

41-45 

MD9 

Number  of  data  points  on  da/dn  vs 
K  curve  for  R  >  .4  and  180  cpm 
data 

Card 

Type  Ten 

Column 

Variable 

Definition 

I- 5 

6-10 

II- 15 

• 

DEDN(1,M) 

Da/dn  points  along  curve  corres¬ 
ponding  to  MDl  (MDl  points  must 
be  entered  -  M=l,  MDl) 

• 

• 

45-50 

Card  Type  Eleven 


1 

Wi.  umu 

Variab 1c 

Dcfir.it1'  cr 

1-5 

6-10 

• 

• 

DEK(1,M) 

Delta  K 
ponding 
entered 

points  along  curve  corres- 
to  MDl  (MDl  points  must  be 
-  M=l,  MDl) 

45-50 

NOTE :  One 

card  type  eleven 

(11)  and  nine  sets  of  cards 

with  each  set  containing  one  card  type  twelve  (12) 
and  one  card  type  thirteen  (13)  will  be  entered. 
The  curves  for  MD1  -  MD9  are  read  in  order. 

NOTE:  Card  type  twelve  (12)  is  entered  only  if  (K10  =  1). 


Column 


Card  Type  Twelve 
Variable 


Definition 


1-10  GMA.X 


Maximum  K  multiple 
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Card  Type  Twelve  (Cont'd) 


Column 

Variable 

Definition 

11-20 

GMIN 

Minimum  K  multiple 

21-30 

AREF 

Crack  length  at  which  997«  of 
difference  between  GMAX  and 
GMIN  is  attained. 

NOTE: 

Card  type  thirteen  (13)  is  entered  only  if  (KEY6  =  1) 
If  (KEY6  =  0)  Boeing  a/2c  =  0.5  data  will  be  used. 

Card 

Type  Thirteen 

(Used  when  K9  =  5) 

Column 

Variable 

Definition 

1-5 

IPF 

IPF  =  0  for  Paris  equation 

IPF  =  1  for  Forman  equation 

6-10 

NRC 

Number  of  R  values  for  which 
dadn  data  is  entered  (NRC  »  1 
for  Forman  equation  and  NRCmax 
=  3) 

11-50 

DADNID 

40  alphanumeric  characters  to 
describe  dadn  data 

51-55 

56-60 

61-65 

RVAL 

Number  of  line  segments  used 
to  define  dadn  data  for  each 

R  value 

Card  Type  Fourteen 

(Used  when  K9  =  5) 

Column 

Variable 

Definition 

1-10 

DACON 

C  value  used  in  dadn  equation- 
C*AK**N 

11-15 

DSL0PE 

N  value  in  dadn  equation 

16-20 

DKMAX 

Maximum  AK  for  which  this  line 
segment  of  dadn  curve  is  used 
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Card  Type  Fourteen  (Cont'd) 


Column 

Variable 

Definition 

21-30 

DACON 

Same  as 

columns 

1-20  except  for 

31-35 

DSLOPE 

another 

segment 

of  dadn  data 

36-40 

DKMAX 

41-50 

DACON 

Same  as 

columns 

1-20  except  for 

51-55 

DSLOPE 

another 

segment 

of  dadn  data 

55-60 

DKMAX 

61-65 

RVAL 

Kc  if  Forman  equation  used  (IPF1 

R  if  Paris  equation  used  (IPF=0) 
R  equals  rain  stress  divided  by 
max  stress 


NOTE:  Card  14  will  be  repeated  NRC  times,  and  each  card 

will  have  RVAL(I)  line  segments  to  define  the  dadn 
data. 


Card  Type  Fifteen 


Column 

Variable 

De finition 

1-5 

AM(I) 

I  =  1,11 

6-10 

51-55 

points  are  read  as  a  function 
of  BOT  (crack  depth/thickness)  for 
BOT  values  of  0,  .1,  .2,  ...  1.0 

Card  Type  Sixteen 

Column 

Variable 

Definition 

1-5 

SMULT(M) 

M  -  1,  NCOND 

6-10 

45-50 

Stress  factors  are  read  for  each 
condition.  SMULT  times  load 
gives  stress  in  ksi  (10  is  max¬ 
imum  NCOND) 

56-60 

61-65 

KR1 

KR2 

Constants  used  to  begin  calcu¬ 
lation  of  random  numbers 
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Card  Type  Seventeen 


Column  Variable 


Definition 


1-5  EXM(M) 

6-10 
7-15 


M  =  1,  MSETS 

retardation  factors  to  be  used  in 
this  problem  (maximum  of  14) 


55-60 

IV.  OUTPUT  DATA 

All  printed  output  data  is  identified  with  headings  that  are 
self-explanatory.  Punched  card  output  can  be  obtained  by 
using  the  variable  LIO  in  card  type  six  (6).  This  output  gives 
the  crack  length  and  flight  hours  for  problems  with  200  hour 
blocks . 

V.  TIME  ESTIMATE 

Procedure  TD9  takes  approximately  1.5  minutes  to  load  and  then 
the  execution  will  require  less  than  1.0  minute  for  each  million 

_ -I _ 

y  s~  jlco  • 

VI.  ERROR  MESSAGES 

Procedure  TD9  has  built  in  checks  that  will  cause  a  problem 
to  terminate.  If  any  of  these  checks  find  an  error,  an 
explanation  of  the  error  will  be  given  on  the  computer  output 
and  the  next  problem  will  be  attempted. 
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VI. 5  UNIT  STRESS  CONCEPT 


The  unit  stress  concept  (stress  per  unit  of  load)  provided 
an  expeditious  method  of  relating  stress  at  a  point  to  applied 
load.  For  fatigue  (and  crack  growth)  analysis,  a  stress  spectrum 
is  required  which  will  reflect  tensile  stresses  experienced  by 
both  upper  and  lower  wing  surfaces. 


The  lower  wing  surface  is  in  tension  due  primarily  to 
positive  flight  maneuvers  (wing  tip  up)  while  the  upper  surface 
is  generally  in  tension  during  negative  flight  maneuvers  (wing 
tip  down).  Design  effort  was  generally  concentrated  at  baseline 
center  spar  stations  140  and  340,  a  typical  inboard  and  outboard 
area  of  the  wing  box  respectively. 


While  the  complete  baseline  fatigue  loads  spectrum  contains 
bending  moments,  shears  and  torsions,  the  predominate  load 
contributor  to  the  magnitude  of  stress  in  critical  structure  is 
net  bending  moment.  Therefore,  a  fatigue  loads  spectrum  for 
positive  and  negative  maneuvers  was  prepared  in  terms  of  wing 
bending  moment  at  the  pivot.  Unit  stress  coefficients  were  then 
developed  as  a  means  to  transform  pivot  bending  moment  to  stresses 


The  use  of  pivot  bending  moment  for  developing  stress 
coefficients  rather  than  bending  moments  at  the  local  wing 
stations  assumes  that  a  constant  relationship  between  BM,  shear 
and  torsion  exists  at  any  wing  station  along  the  span.  This 
relationship  does  not  remain  exactly  constant  in  the  F-111F  wing- 
but  since  shear  and  torsion  do  not  significantly  contribute  to 
wing  stresses  at  points  considered  critical  in  fatigue  and  fracture 
the  assumption  was  considered  valid  for  analysis  during  Phase  IA  ’ 
just  as  it  was  during  the  F-lll  program.  If  the  detail  design 
(and  analysis)  effort  in  the  follow-on  indicates  that  other  load 
parameters  contribute  significantly  to  the  stress  in  a  structural 
element,  they  will  be  included. 


The  actual  development  of  unit  stress  coefficients  was 
accomplished  as  follows.  A  finite  element  math  model  was  used 
to  develop  baseline  ultimate  stresses  for  each  of  the  four  F-111F 
static  design  conditions  selected  for  this  program.  Two  conditions 
represent  positive  loading  (F400A,  F101A) ,  and  two  represent 
negative  loading  (F401A,  F702A).  Stress  distributions  for  the 
aseline  cross  sections  at  C.S.S.  140  and  340  resulted  from  this 
analysis.  Stresses  for  both  the  upper  and  lower  surfaces  were 
included.  Additional  discussion  of  these  analyses  was  given  in 
Section  V  of  Volume  I  and  Appendix  V  of  Volume  III. 
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The  maximum  cross  section  stresses  for  the  lower  surface 
occur  in  the  region  of  the  forward  auxiliary  spar.  Maximum 
stresses  for  the  upper  surface  occur  in  the  center  spar  region. 
These  maximum  ultimate  design  stresses  for  each  condition  were 
reduced  to  limit  design  stresses  (1.5  factor),  and  "unitized' 
using  the  corresponding  limit  design  pivot  bending  moments.  The 
procedure  is  illustrated  typically  below  for  C.S.S.  140: 

F400A  (M  =  1.05,  A=  45°,  h  =  2000',  nz  =  7.33) 

fLinu  =  47.5/1.5  =  31.67  KSI  (ten.  lower  surface) 

Lim.  Pivot  BM  =  19.52  x  106  in.  lbs. 
f/106  in. lb.  BMp  =  31.67/19.52  =  1.622  KSI 
F101A  (M  =  330  KCAS,  A=  16°,  S.L.,  nz  =  4.124) 

fLim  =  42.9/1.5  =  28.6  KSI  (ten.  lower  surface) 

Lim.  Pivot  BM  =  17.66  x  10  in.  lbs. 
f/io6  in. lb.  BMp  =  28.6/17.66  =  1.619  KSI 
F-401A  (M  =  1.05,  A  =  45°,  h  =  8000’,  nz  =  -  3.00) 


fLim. 

Lim.  Pivot  BM 
f/io6  in. lb.  BMp 
F702A  (M  =  1.40,  A  = 
fLim. 

Lim.  Pivot  BM 


=  24.15/1.5  =  16.1  KSI  (ten.  upper  surface) 
=•9.914  x  106  in.  lb. 

=  16.1/-  9.914  =  -  1.624  KSI 
72.5°,  h  =  17,500',  nz  =  -  3.00) 

=  21.85/1.5  =  14.57  KSI  (ten.  upper  surface) 
=-8.301  x  106  in.  lb. 


f/106  in. lb.  BMp  =  14.57/-  8.301  =  -1.752  KSI 

The  unit  stress  coefficients  at  C.S.S.  340  were  developed 
in  an  identical  manner  for  comparison.  A  summary  of  coefficients 
is  given  below  for  C.S.S.  340  which  illustrates  that  wing  load 
fatigue  stresses  are  relatively  low  at  the  outboard  wing  stations. 
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F400A 


f/106  in.  lb.  BMp  =  0.252  KSI 

F101A 

£/106  in.  lb.  BMp  =  0.256  KSI 

F401A 

f/106  in.  lb.  BMp  =  0.124  KSI 

F702A 

f/106  in.  lb.  BMp  =  0.257  KSI 

The  maximum  unit  stress  coefficient  for  the  C.S.S.  140 
lower  surface  and  upper  surface  was  then  selected  for  analysis 
purposes.  The  selected  coefficients  are  shown  underlined  in 
the  preceding  summaries. 

The  baseline  unit  stresses  were  adjusted  for  use  with  other 
materials  by  applying  a  ratio  based  on  material  ultimate 
strength  allowables. 

Variation  in  the  basic  spectrum  of  fatigue  stresses  was 
accomplished  by  increasing  or  decreasing  the  unit  stress 
coefficients  by  +  10%  increments  and  then  multiplying  the 
appropriate  pivot  bending  moment  spectrum  by  the  incremented 
unit  stresses.  This  variation  was  required  to  generate  the 
"catalog"  of  fatigue  damage  curves  discussed  in  paragraph  VI .  1 . 

It  should  be  noted  that  the  maximum  positive  pivot  bending 
moment  occurring  in  the  F-lll  baseline  fatigue  loads  spectrum 
is  15.55  x  10®  in.  lbs.  (occurring  in  condition  5:M  =  0.9, 

A  =  72.5°,  S.L.,  nz  =  8.43).  This  maximum  operating  load 
for  the  baseline  is  less  than  design  limit.  The  maximum 
baseline  negative  pivot  bending  moment  is  -  3.46  x  10®  in.  lb. 
(Condition  8:M  =  0.75,  A=  26°,  h  =  20,000',  ng  -  1.50),  also 
below  design  limit  load. 

The  fact  that  the  baseline  operating  loads  (stresses) 
are  less  than  design  limit  loads  (stresses)  led  to  the  decision 
that  all  design  allowable  data  would  be  better  presented  in 
terms  of  "maximum  allowable  spectrum  stress"  level,  which  would 
correspond  to  the  15.55  x  10^  in. lb.  pivot  bending  moment  noted 
above  for  the  lower  surface  or  the  -  3.46  x  106  in.  lb.  pivot 
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bending  moment  for  the  upper  surface.  This  method  of  identify 
ing  the  allowable  stresses  was  used  throughout  Phase  IA. 
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APPENDIX 


VII 


COST  ESTIMATION  DATA 


This  appendix  contains  a  discussion  of  cost  estimates  as 
they  apply  to  the  various  evaluation  steps  in  the  program.  It 
is  intended  to  provide  a  more  detailed  explanation  of  cost 
data  which  has  been  generated  in  support  of  the  Advanced  Air 
Superiority  Fighter  Wing  Structure  Program.  Information  from 
the  baseline  cost  document  is  also  contained  in  this  appendix. 


VII. 1  BASELINE  COSTS 

FZM  No.  5990,  dated  28  July  1972,  titled  "Advanced  Air 
Superiority  Fighter  Wing  Structures,  Baseline  Definition  Cost 
Description"  provides  the  baseline  document  which  defines  in 
detail  the  costs  associated  with  producing  the  F-111F  wing 
box.  This  document  identifies  a  specific  aircraft  (Unit  No.  506) 
as  a  point  baseline  for  costs.  From  this  point  cost,  learning 
curves  were  applied  to  obtain  costs  for  manufactured  units 
Nos.  1,  2,  50,  150,  200,  and  800.  These  costs  were  generated 
for  a  production  rate  of  20  aircraft  per  month.  The  point 
cost  for  Unit  506  was  obtained  from  expenses  incurred  in  the 
fabrication,  assembly,  material,  and  outside  procurement 
activities  for  the  production  of  an  F-111F  wing  during  manu¬ 
facturing  Lot  No.  20.  This  lot  consisted  of  22  F-lllF  air¬ 
craft  Nos.  37  through  58  and  represents  aircraft  495  through 
516  in  the  overall  F-lll  production  program. 

Component  costs  for  skins,  ribs,  spars,  etc.,  were  estab¬ 
lished  for  the  point  aircraft  only.  These  costs  served  to 
identify  the  high  cost  items  and  indicated  where  the  largest 
savings  could  be  realized.  Figure  65  provides  an  overview 
of  the  basic  cost  structure  which  is  used  by  Convair.  The 
information  contained  in  that  report  has  been  used  as  a  base¬ 
line  for  this  program.  As  such,  it  supports  the  document 
FZM-5989,  Advanced  Air  Superiority  Fighter  Structures,  Baseline 
Definition,  Structural  Description  and  FZM-6100,  Baseline 
Document  for  Advanced  Air  Superiority  Fighter  Wing  Structures 
have  also  been  submitted. 
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Figure  65  Convair  Cost  Structure 


VII. 2  COMPONENT  COST  BREAKDOWN 

A  breakdown  of  cost  by  general  components  was  provided 
in  the  baseline  document  and  is  shown  in  Table  XL.  Included 
in  the  individual  component  cost  is  all  recurring  direct 
charges  for  material,  fabrication,  hardware,  installation  into 
the  basic  wing  box,  and  sealing  operations. 

These  figures  are  based  on  the  point  aircraft  at  the 
average  production  rate  actually  experienced  during  the  F-lll 
program. 

VII. 3  PRODUCTION  RATE  AND  QUANTITIES  COST 

Costs  for  production  quantities  are  shown  in  detail  in 
Table  XLII  and  are  plotted  in  Figure  66.  The  point  aircraft 
costs  for  both  actual  production  rate  and  for  20  aircraft  per 
motith  are  shown  in  Table  XLII  to  permit  cross  referencing  to 
Table  XL.  These  two  costs  for  the  point  aircraft  are  also 
shown  in  Figure  66. 

Overhead  costs  plus  General  and  Administrative  charges 
are  shown  in  Table  XLII  for  information.  The  curve  identified 
as  TOTAL  COST"  in  Figure  66  includes  all  Recurring  Costs,  as 
defined  in  Figure  65  while  the  curve  identified  as  "MANUFACTURING 
COST"  Excludes  Overhead  and  General  and  Administrative  charges. 

The  point  cost  generated  for  F-lll  No.  506  was  used  to 
establish  a  stable  baseline  for  comparison.  Since  the  produc¬ 
tion  rate  greatly  affects  the  overall  cost  of  a  structure,  the 
baseline  cost  was  evaluated  to  determine  the  effect  of  a 
twenty  aircraft  per  month  production  rate.  The  results  of 
this  analysis  are  shown  in  Table  XLII. 

The  actual  F-lll  wing  costs,  projected  to  a  twenty  ai  - 
craft  per  month  production  rate,  were  used  as  the  baseline 
cost  for  this  program.  A  "design  to  cost"  target  of  $54,640 
(154  below  baseline)  was  established  as  one  of  the  program 
goals  for  at  least  one  wing  configuration. 

VII. 4  COST  COMPARISONS 

Table  XLI  lists  the  significant  factors  included  in 
developing  the  cost  data  in  this  project. 
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Table  XL 

F-lll  WING  BOX  COMPONENT  COST  BREAKDOWN 
(Point  Baseline,  Aircraft  506) 


COMPONENT/ACTIVITY 

COST 

1.  Upper  Skin 

1903.89 

2.  Lower  Skin 

3011.75 

3.  Spars 

19803.13 

4.  Ribs 

2825.07 

5.  Pylons 

9023.75 

6.  Miscellaneous 

6072.41 

7.  Mfg  Direct  Charges 

116 

8.  Subtotal  (1-7 

$42,756 

9 .  Engineering 

1440 

10.  Tooling  Maintenance 

554 

11.  Other  Direct  Charges 

35 

12.  Subtotal  (9-11) 

$  2,029 

13.  Overhead 

23,665 

14.  General  &  Administrative 

5,475 

15.  Subtotal  (13  &  14) 

$29,140 

Total  Cost 

$73,925 
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Table  XLI 

FACTORS  USED  IN  COST  COMPARISONS 


MATERIAL 

Base  Price  of  Material 

Extras:  Length,  width,  thickness 

Quantity 

Attrition  Extrusions 

Freight  Castings 

Allocations  Forgings 


MANUFACTURING  -  (FACTORY /FABRICATION/ASSEMBLY) 


Fabrication  Labor 
Sub -Assembly  Labor 
Processing  Labor 
Assembly  Labor 
Quality  Assurance 


TOOLING 


Metal  Removal  Rates 
Experience /Learning  Curve  Data 
Experience /Prior  History  Data 
Experience /Similar  Programs 
Production  Rate  (Units  Per  Time) 
Tooling  Concept 


Tool  Manufacturing  Labor  Tool  Maintenance 

Tool  Material  Special  Maintenance  (Example: 

Brazing  Tooling) 

Special  Material 

Computer  Charges  (N.C.  Machining)  Tool  Planning  and  Design 

Allocations /Other  Charges  Manufacturing  Engineering 

Duplicate  Tool  Sets  (Production  Limited  O.H.  Burden 

Rate) 


224 


Excluded  cost  factors  include  such  items  as  risk,  profit 
and  escalation  factors. 

The  following  sections  numbered  VII. 5  through  VII. 11  are  in 
explanation  of  the  source  of  cost  information  and  cost  compari¬ 
son  development. 


VII. 5  MATERIAL  COSTS 

The  material  cost  data  used  in  this  project  has  been 
supplied  by  Material  Department  cost  estimators.  Costs  of 
material  were  obtained  from  recent  purchase  orders,  recent 
quotes  from  vendors,  or,  for  some  of  the  new  material  applica¬ 
tions,  by  telephone  calls  to  the  mills  or  suppliers.  Costs 
were  developed  for  the  specific  material  form,  size,  length, 
and  thickness.  Any  other  "extra"  costs  involved  for  that 
item  were  also  considered.  This  provided  a  cost  per  pound 
for  use  in  calculations.  For  new  materials,  the  material  cost 
has  been  projected  on  the  basis  of  increased  usage. 

An  attrition  factor  was  developed  using  prior  historical 
experience  and  anticipated  factory  loading  to  be  applied  to 
the  material  costs.  Allocation  costs  and  freight  were 
assigned  as  a  numerical  percentage  to  be  applied  to  material 
costs. 


VII. 6  MANUFACTURING  COSTS  (FACTORY) 

All  tasks  associated  with  the  manufacturing  or  a  product, 
excluding  materials  procurement  and  manufacturing  engineering, 
are  factory  responsibilities.  Therefore,  for  convenience, 
the  term  "factory"  is  frequently  used  to  describe  the  labor 
cost  of  a  product.  The  labor  hours  for  a  given  concept  were 
supplied  by  Industrial  Engineering  after  analysis  of  the 
drawings. 

Various  techniques  are  used  for  establishing  standards 
and  estimating  factory  costs.  For  instance,  the  amount  of 
metal  removed  is  a  key  factor  in  estimating  machining  opera¬ 
tions.  In  another  operation  such  as  bonding,  square  footage 
may  be  the  key  estimating  factor.  Welding  estimates  consider 
the  number  of  passes  and  inches  of  weld. 

At  Convair,  the  fabrication,  machining,  processing,  and 
sub-assembly  operations  are  normally  grouped  together,  and 
referred  to  as  "Fabrication"  while  major  assembly  and  final 
finishing  is  covered  under  the  term  "assembly"  operation. 
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Quality  Assurance  costs  are  a  factor  of  manufacturing 
costs.  This  factor  is  added  by  the  Industrial  Engineering 
estimator,  after  arriving  at  a  manufacturing  cost. 

The  impact  of  production  quantity  and  schedule  is  considered 
in  the  factory  labor  estimates.  Use  of  experience  curve  data, 
commonly  referred  to  as  "learning  curve''  data,  has  been  applied 
to  all  factory  estimates.  A  number  one  unit  manhour  estimate 
is  developed,  then  by  use  of  learning  curve  factors,  an  estimate 
is  made  for  the  desired  unit  cost.  An  appropriate  labor  rate 
is  applied  to  the  labor  hour  estimate  to  give  a  dollar  value. 

VII. 7  TOOLING  COST 

Several  terms  are  used  to  describe  the  Manufacturing 
Engineering  function.  Often  the  term  "tooling"  is  applied 
since  it  is  their  task  to  plan,  design,  and  manufacture  the 
tools  needed  to  manufacture  a  given  product.  Further,  they 
plan  the  detail  fabrication,  processing,  and  manufacturing 
operations  of  all  details,  sub-assemblies,  and  assemblies. 

Another  tooling  function  is  to  provide  manufacturing  engineer¬ 
ing  "consultants"  to  the  design  team  to  advise  them  on 
manufacturing  and  producibility. 

Through  evaluation  of  a  given  concept,  the  manufacturing 
engineer  can  determine  the  kind  and  type  of  "hard"  tools 
needed  to  manufacture  the  product.  With  this  information,  an 
estimate  of  tool  manufacturing  hours  can  be  developed  using 
historical  tool  cost  data.  With  this  estimate  for  hard  tool¬ 
ing  as  a  base,  additional  factors  can  be  applied  to  provide 
a  complete  estimate.  Tool  maintenance,  for  example,  is  one 
of  the  factors  that  can  be  determined  with  the  tool  manufactur¬ 
ing  hours  as  a  base  cost  element. 

VII. 8  SCHEDULE 

The  rate  of  production,  or  delivery  schedule  of  the 
product  is  an  important  factor  of  cost.  This  rate  determines 
the  quantity  of  "Rate"  tools  required  to  meet  the  manufacturing 
schedule. 

To  establish  the  cost  of  duplicate  tools  required,  a 
production  rate  of  twenty  units  per  month  was  established.  The 
actual  cost  of  the  F-lllF  wing  was  adjusted  to  reflect  the  cost 
improvement  anticipated  by  the  improved  production  rate.  The 
difference  in  cost  is  reflected  in  Table  XLII. 
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VII. 9  GRASS  ROOTS  ESTIMATING  METHOD 

The  "grass  roots"  estimating  technique  was  used  to  develop 
the  comparative  cost  data.  A  single  set  of  drawings  was  provided 
to  each  functional  department  representative  for  use  in  prepar¬ 
ing. cost  data.  The  same  ground  rules,  labor  rates,  etc., 
were  used  on  the  various  concepts  as  were  used  on  the  baseline 
design. 

The  functional  department  inputs  were  received  by  Value 
Engineering.  In  some  instances  Value  Engineering  assisted  the 
functional  departments  in  preparing  the  estimates.  From  this 
data,  applicable  rates  and  factors  were  added  to  give  a  compara¬ 
tive  cost  figure  for  each  element,  such  as  a  skin  or  a  spar. 

This  cost,  based  upon  a  production  cost  point  of  506,  was 
provided  to  design  for  their  review  against  baseline  costs  and 
targeted  goals.  The  cost  of  the  details  such  as  skins,  spars, 
hat  sections,  bolts,  adhesive,  etc.,  were  made  available  on  a 
master  analytical  assembly  cost  drawing  for  each  of  the  con¬ 
cepts.  The  drawing  was  then  left  open  on  a  design  board  in 
the  area. 

The  data  allowed  the  designer  to  see  the  cost  impact  of 
the  various  elements  as  he  continued  to  analyze  his  design 
for  alternatives.  Further  trade  studies  on  various  elements 
were  made  so  that  the  designer  could  see  the  relative  cost 
impact  of  proposed  changes  The  more  cost  favorable  design 
approaches  could  then  be  adopted  prior  to  the  final  phase  of 
the  program. 


VII. 10  COSTING  LEVELS 

The  baseline  cost  document  established  a  ground  rule 
that  cost  data  would  not  be  developed  on  the  element  and 
cross-section  concepts  phases  of  the  program.  Comparison 
to  the  baseline  was  to  be  on  a  best  estimate  basis  only. 

However,  to  insure  cost  integrity  in  the  evaluation  of 
the  concepts,  it  was  later  determined  it  would  be  beneficial 
to  establish  cost  comparison  data  for  all  of  the  fifty 
cross  section  concepts.  This  effort  greatly  exceeded  the 
original  intent  of  the  program. 

All  other  costing  efforts  either  met  or  exceeded  the 
costing  level  efforts  as  established  in  the  baseline  require¬ 
ments. 
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VII. 11  COSTING  GROUNDRULES  AND  FACTORS 

The  following  ground  rules  were  followed  in  preparing 
comparative  cost  analyses  for  the  selected  configurations: 

a.  Overhead  costs  for  all  facets  of  manufacturing , 
materials,  engineering,  and  tooling  were  not 
included  in  the  cross  section  and  analytical 
assembly  evaluation  phases. 

b.  Additional  costs  for  General  and  Administrative 
expenses  were  not  included  in  the  cross  section 
and  analytical  assembly  evaluation  phases. 

c.  During  the  cross  section  concept  and  analytical  assembly 
phases  Engineering  Liaison  costs  were  not  considered 

in  the  recurring  cost  category.  However  they  were 
projected  independently  as  support  for  the  factory 
during  the  manufacturing  program  for  the  full  wing 
estimates. 

d.  Tool  maintenance  costs  were  projected  in  the  recurring 
cost  category  and  listed  independently  in  the  final 
cost  breakdown  as  a  separate  line  item. 

e.  It  was  assumed  that  the  Air  Force  would  take  control 
of  the  tools  at  the  completion  of  the  contract. 
Therefore,  no  continuing  maintenance  and  control  costs 
were  included  for  this  task. 

f.  Costs  were  included  for  Quality  Assurance  and 
Manufacturing  Quality  Control  support  during  the 
Engineering  and  Manufacturing  span  of  the  contract. 

g.  Costs  were  projected  based  on  labor  rates  and 
material  charges  used  for  the  point  baseline  cost 
No  attempt  was  made  to  incorporate  escalating  costs 
due  to  inflationary  factors,  etc. 

h.  Corresponding  baseline  data  costs  were  determined  for 
comparison  purpose  in  both  the  cross  section  and 
analytical  assembly  phases  of  the  program. 


229 


t 


VII. 12  STRUCTURAL  DESCRIPTION 

Those  items  included  in  the  baseline  wing  box  are 
shown  in  Figure  67.  Only  the  basic  wing  box  was  included; 
the  leading  edge,  trailing  edge,  tip,  and  pivot  fitting  were 
deleted.  Pylon  attach  points  were  included,  but  the  components 
required  to  rotate  them  were  not  included  since  these  would 
probably  not  be  required  on  an  advanced  air  superiority  fighter. 
Electrical  and  fuel  equipment  were  not  included. 

VII. 13  MANUFACTURING  SEQUENCE 

Manufacturing  of  the  F-lll  wing  is  shown  schematically 
in  Figure  68.  Those  items  not  included  in  the  baseline 
are  identified.  All  assembly  operations  associated  with  the 
basic  wing  box  were  included  in  the  cost.  These  include  fuel 
sealing  and  internal  corrosion  protection  systems  required  to 
insure  the  integrity  of  the  integral  fuel  tank. 

Painting  of  the  external  surface  was  not  included  since 
that  operation  is  performed  after  installation  to  the  aircraft. 
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UPPER  SKIN 
MACHINED  I, MILLED 
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Figure  G7  Baseline  Wing  Box 


SEE  NOTE 


I 

appendix  VIII 

MATERIALS  TEST  PROGRAM  DATA 
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Table  XLIII 

BASIC  PHASE  IA  MATERIALS  TEST  PROGRAM 


t 


TITANIUM 

CO 

1 

CVI 

t 

OO 

1 

OO 

Plate 

vO 

1 

vO 

OO 

24 

See  Note  7 

>— 

—1 

Plate 

- 

Sheet 

CO 

1 

■ 

t 

24 

—I 

Plate 

- 

- 

CVI 

ALUMINUM 

7475 

-T7351 

Plate 

sO 

1 

CO 

• 

24 

LT 

Plate 

- 

- 

-T761 

Sheet 

vO 

1 

1 

• 

^T 

CVI 

- 

Plate 

- 

- 

- 

CVI 

7050 

-T73651 

Plate 

CO 

vO 

CO 

CO 

vO 

4 

See  Note  1 

24 

LT 
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- 

- 

- 

'O 

O- 

F— 

1 

Sheet 

s 

33 

_ 

1 

24 

- 

Plate 

- 

- 

- 

CVI 

TYPE  OF  SPECIMEN 

Plate 

Round 

Round 

Comp.  Tens. 

Compact 

Tension 

Notched  Flat 

See  Note  6 

Sheet 

Flat 

5 

u_ 

1 

1 

•  TENSILE  STRENGTH  YIELD  AND 

ULTIMATE  -  SEE  NOTE  2,  3  &  4 

•  COMPRESSIVE  STRENGTH  YIELD  AND 
ULTIMATE  -  SEE  NOTE  2 

•  FRACTURE  TOUGHNESS,  K|C 

•  STRESS  CORROSION  K| $CC 

2  DIRECTIONS,  4  SPECIMEN/DIRECTION 

SALT  WATER 

•  FATIGUE  (S/NI,  3  STRESS  LEVELS, 

4  SPECIMEN/LEVEL,  Kt  *  3.0  &  5.0,  R  =  0. 1 

DIRECTION 

k_ 

CD 

"Jo 

L_ 

< 

L_ 

L_ 

CD 

03 

LO 

qj 

o 

•  CRACK  PROPAGATION 

Constant  Amplitude 

6CPM,  R.T.  R  -  0.3,  Sa 

360CPM,  R.T.  R  =0.3,  t 

60CPM,  R.T.  *  0.3,  Sail 
Spectrum  Loading  (See  N 
360CPM,  R.T.  Dry  Air 

LL.  C 
O  — 

S\ 

co  C 
o> 

Lu  E 
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<D 
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O) 
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Table  XLIV 


TENSILE  PROPERTIES  OF  2024-T851 
ALUMINUM  ALLOY  PLATE,  1%"  THICK 


Grain 

Spec. 

TYS 

TUS 

Elong. 

R.A. 

Direction 

No. 

ksi 

ksi 

1  in  2" 

% 

L 

10 

67.1 

71.6 

6.0 

17.4 

1 

12 

68.0 

72.2 

7.0 

24.3 

t 

AV. 

67.5 

71.9 

6.5 

20.8 

LT 

9 

65.1 

70.3 

5.0 

13.3 

1 

11 

65.1 

70.1 

5.0 

12.6 

T 

AV. 

65.1 

70.2 

5.0 

12.0 

Center  Thickness  Specimens 

_ i 

Alcoa  Lot  217-921 


Table  XLV 


ROOM  AND  ELEVATED  TEMPERATURE  TENSILE  PROPERTIES  OF 
7050-T76  ALUMINUM  ALLOY  SHEET, 0.06  "THICK 


Room  Temp.  Tests 


Te 

Exposure 

Grain 

Direct. 

Spec. 

No. 

TYS 

ksi 

TUS 

ksi 

Elong. 

1  in  2" 

Test 

Temp. 

•f 

Spec. 

No. 

TYS 

ksi 

TUS 

ksi 

Elong. 

%  in  2" 

mp. 

’F 

Time 

Hours 

None 

None 

1 

13 

80.6 

85.3 

10.0 

15 

81.1 

85.3 

10.0 

121 

81.6 

86.4 

10.0 

AV. 

81.1 

85.7 

10.0 

LT 

93 

77.3 

85.4 

9.5 

1 

94 

77.3 

85.4 

9.5 

95 

77.4 

85.3 

10.0 

T 

AV. 

77.3 

85.4 

9.7 

270 

0. 

5 

L 

20 

78.0 

83.6 

10.0 

270 

18 

66.7 

67.7 

11.5 

1 

40 

77.4 

83.0 

9.5 

19 

65.7 

66.3 

12.0 

60 

76.9 

82.5 

9.5 

23 

64.9 

67.9 

12.0 

1 

AV. 

77.4 

83.1 

9.7 

AV. 

65.8 

67.3 

11.8 

10 

25 

77.0 

83.0 

10.0 

30 

65.1 

65.8 

13.5 

1 

42 

76.8 

82.6 

9.5 

41 

64.4 

65.1 

13.0 

J 

1 

51 

76.2 

82.0 

9.5 

111 

64.7 

65.0 

13.0 

AV. 

76.7 

82.5 

9.7 

AV. 

64.7 

65.3 

13.2 

100 

26 

74.0 

80.5 

9.5 

31 

61.9 

62.1 

14.0 

1 

43 

74.0 

80.8 

10.0 

61 

62.1 

62.5 

13.5 

52 

73.9 

80.7 

10.0 

112 

62.2 

62.5 

14.0 

i 

t 

AV. 

74.0 

80.7 

9.8 

AV. 

62.1 

62.4 

13.8 

300 

0, 

.5 

L 

32 

77.1 

83.9 

10.0 

300 

14 

63.0 

63.6 

14.0 

1 

44 

77.4 

83.3 

10.0 

16 

60.3 

63.1 

14.0 

\ 

50 

77.1 

83.3 

9.5 

21 

60.9 

64.3 

14.0 

1 

AV. 

77.2 

83.5 

9.8 

AV. 

61.4 

63.8 

14.0 

10 

45 

75.6 

81.6 

10.0 

33 

60.3 

60.8 

14.0 

i 

1 

54 

75.1 

81.6 

10.0 

53 

60.6 

61.1 

14.0 

62 

75.7 

81.6 

10.0 

113 

60.1 

60.8 

14.0 

I 

1 

AV. 

75.5 

81.6 

10.0 

AV. 

60.3 

61.0 

14.0 

100 

47 

63.2 

72.9 

10.5 

27 

51.2 

51.4 

16.0 

J 

l 

55 

62.8 

72.4 

10.5 

46 

50.9 

51.0 

15.5 

1 

t 

’ 

AV. 

63.0 

72.6 

10.5 

114 

49.8 

50.7 

17.0 

AV. 

50.6 

51.0 

16.2 

350 

0 

.5 

L 

28 

74.0 

80.5 

10.5 

350 

17 

51.9 

53.2 

15.0 

1 

1 

35 

74.1 

80.9 

10.5 

22 

52.7 

54.4 

15.0 

56 

74.1 

80.9 

10.0 

24 

53.1 

54.8 

15.0 

\ 

AV. 

74.1 

80.8 

10.3 

AV. 

52.6 

54.1 

15.0 

10 

37 

60.8 

71.1 

10.0 

36 

44.2 

45.2 

17.0 

38 

60.8 

71.2 

10.5 

48 

43.3 

45.0 

17.5 

[ 

57 

60.0 

70.4 

10.5 

115 

43.4 

44.3 

17.5 

4 

r 

AV. 

60.5 

70.9 

10.3 

AV. 

43.6 

44.8 

17.3 

100 

39 

42.8 

57.5 

10.0 

29 

28.9 

32.8 

22.0 

1 

49 

42.1 

56.4 

10.0 

58 

28.4 

32.3 

21.5 

59 

41.8 

56.1 

10.0 

116 

28.0 

32.4 

22.0 

1 

1 

AV. 

42.2 

56.7 

10.0 

AV. 

28.4 

32.5 

21.8 

Tested  at  Elevated  Temperature 


*A11  tests  from  0.06  x  48  x  48  inches  sheet  from  Alcoa  lot  109-216. 
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Table  XLVI 


ROOM  AND  ELEVATED  TEMPERATURE  TENSILE  PROPERTIES  OF 
7050-T73651  ALUMINUM  ALLOY  PLATE,  3"  THICK 


Tested  at  Elevated  Temperature 

Room 

Torn? . 

Test 

After  Exposure  for  Indicated  1 

rime 

Spec . 

TUS 

Elong. 

R.A  . 

Test 

Spec . 

TYS 

TUS 

Elong. 

R.A. 

No. 

TYS 

X  in  4D 

X 

Temp. 

No. 

Z  in  4D 

Z 

Exposure 

Grain 

KSI 

KSI 

•F 

KSI 

KSI 

Temp. 

Time 

Direct. 

Hour 

None 

None 

L 

19B 

70.8 

78.5 

8.5 

19.9 

22A 

70.7 

78.7 

10.0 

18.8 

1 

25A 

69.2 

76.2 

10.5 

20.0 

AV. 

70.2 

77.8 

9.7 

19.6 

LT 

42A 

69.1 

77.2 

8.0 

19.6 

43A 

68.8 

76.9 

8.5 

22.5 

1 

43B 

70.1 

78.8 

8.0 

16.4 

AV. 

69.3 

77.6 

8.2 

19.5 

ST 

77 

65.3 

72.5 

1.3 

5.4 

78 

65.0 

73.9 

2.4 

7.1 

1 

79 

65.0 

73.4 

2.2 

6.7 

AV. 

65.1 

73.3 

2.0 

6.4 

270 

0. 

5 

L 

26B 

71.1 

78.9 

8.0 

20.2 

270 

25B 

62.1 

63.6 

12.5 

32.2 

1 

31A 

69.4 

76.4 

9.5 

26.1 

35A 

61.3 

61.5 

12.5 

37.5 

1 

36B 

70.6 

77.6 

9.5 

20.1 

38B 

62.0 

63.3 

11.5 

32.7 

1 

AV. 

70.4 

77.6 

9.0 

22.1 

AV. 

61.8 

62.8 

12.2 

34.1 

10 

i 

15A 

69.4 

76.2 

9.5 

27.0 

26A 

61.0 

61.8 

12.0 

35.4 

27A 

69.6 

76.1 

9.0 

28.4 

30B 

62.4 

62.9 

12.0 

32.0 

28A 

69.5 

76.0 

10.0 

28. 6 

31B 

62.3 

64.6 

10.0 

29.0 

\ 

i 

AV. 

69.5 

76.1 

9.5 

28.1 

AV. 

61.9 

63.1 

11.3 

32.1  1 

100 

20A 

67.4 

74.8 

10.0 

28.8 

15B 

61.9 

62.9 

12.5 

34.2 

1 

20B 

69.0 

77.1 

9.5 

21.7 

18A 

60.3 

60.3 

13.0 

38.5 

1 

23A 

67.1 

74.0 

10.0 

28.6 

37A 

60.0 

60.0 

12.0 

38.4 

T 

AV. 

67.8 

75.3 

9.8 

26.4 

AV. 

60.7 

61.1 

12.5 

37.0 

300 

0. 

5 

L 

16B 

70.3 

78.1 

9.0 

21.9 

300 

14B 

59.1 

59.6 

12.0 

34.5 

1 

1 

24B 

70.5 

78.7 

9.0 

18.9 

i 

17B 

60.3 

60.6 

12.0 

38.0 

29B 

70.9 

78.5 

10.0 

19.6 

39B 

58.6 

59.4 

13.0 

37.7 

1 

\ 

AV. 

70.8 

78.4 

9.3 

20.1 

AV. 

59.3 

59.9 

12.3 

36.7 

10 

13B 

69.8 

78.1 

9.0 

20.5 

17A 

57.7 

58.0 

13.0 

40.9 

1 

34A 

68.0 

75.5 

10.5 

30.6 

22B 

58.2 

58.4 

13.0 

41.5 

4  LA 

68.2 

74.9 

11.0 

30.3 

24A 

57.6 

58.0 

12.5 

41.5 

1 

\ 

AV. 

68.7 

76.2 

10.2 

27.1 

AV. 

57.8 

58.1 

12.8 

41.3 

100 

27B 

62.1 

72.1 

10.5 

20.4 

28B 

52.4 

52.7 

14.0 

40.1 

32A 

60.1 

70.0 

12.0 

35.8 

35B 

52.4 

52.7 

15.0 

40.7 

40A 

59.8 

69.7 

10.5 

33.5 

40B 

51.5 

52.7 

14.0 

41.2 

1 

1 

AV. 

60.7 

70.6 

11.0 

29.9 

AV. 

52.1 

52.7 

14.3 

40.7 

330 

0, 

,5 

1 

, 

32B 

69.0 

77.1 

8.5 

18.7 

350 

33A 

53.3 

53.4 

14.0 

41.7 

37B 

68.5 

77.1 

9.0 

19.9 

33B 

54.0 

54.1 

14.0 

40.3 

38A 

67.0 

74.5 

10.5 

29.1 

345 

53.0 

53.2 

14.0 

41.0 

AV. 

68.2 

76.2 

9.3 

22.6 

AV. 

53.4 

53.6 

14.0 

40.9 

10 

13A 

57.3 

68.2 

12.0 

32.2 

2 1A 

45.1 

45.1 

16.0 

51.0 

i 

14A 

57.3 

68.0 

11.0 

32.2 

30A 

45.6 

45.6 

16.0 

48.4 

1 

29A 

57.0 

67.8 

11.0 

30.7 

39A 

45.0 

45.6 

16.0 

50.9 

AV. 

57.2 

68.0 

11.3 

31.7 

AV. 

45.2 

45.4 

16.0 

50.1 

100 

19A 

41.8 

55.9 

12.0 

37.0 

16A 

34.3 

34.3 

19.5 

60.0 

i 

21B 

42.3 

56.1 

11.5 

31.1 

36A 

33.6 

33.6 

23.0 

65.7 

I 

23B 

42.5 

56.6 

11.5 

28.6 

41B 

34.4 

34.4 

20.0 

61.8 

AV. 

42.2 

56.2 

11.7 

32.2 

AV. 

34.1 

34.1 

20.8 

62.5 

All  longitudinal  &  long  transverse  specimens  from  i  thickness  level. 

Alcoa  Lot  729-091 
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Table  XLVII 


TENSILE  PROPERTIES  OF  3-INCH  THICK 
7050-T73651  PLATE -VENDOR  TESTS* 


Direction 

Tensile 

Ultimate 

Strength 

KSI 

Tensile 

Yield 

Strength 

KSI 

Elongation 
%  in  4 

Times  Diameter 

Long 

75.2 

65 .4 

10.0 

Transverse 

76.9 

67.7 

10.5 

74.7 

65.2 

8.0 

76.4 

67.6 

8.5 

77.3 

69.2 

9.5 

75.3 

66.5 

8.0 

Longitudinal 

74.1 

66.0 

13.0 

74.7 

67.0 

11.0 

74.3 

65.9 

12.0 

75.1 

67.7 

10.0 

77.8 

70.8 

10.0 

77.8 

69.9 

12.0 

Short 

72.3 

64 . 1 

4.8 

Transverse 

73.5 

63.1 

3.6 

73.3 

62.6 

5.6 

74.1 

63.6 

3.6 

73.9 

65.2 

4.1 

74.5 

65.2 

4.8 

*Tests  certified  by  Alcoa  from  their  Lot  No.  729-091  on  3" 
thick  x  60"  wide  plates.  Half  of  those  in  each  direction 
were  from  different  ends  of  the  parent  plate. 
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Table  XLVIII 


TENSILE  PROPERTIES  OF  7475  ALUMINUM  ALLOY 


(ROOM  TEMPERATURE  TESTS) 


7475-T7351 

Grain 

TUS 

TYS 

Plate 

Direc- 

Spec. 

Elong. 

R.A. 

tion 

No. 

KSI 

KSI 

7.  in  2" 

7. 

1.5"  Thick 

L 

75-27 

71.1 

61.1 

14.5 

50.4 

(Alcoa  Lot 

L 

75-28 

71.2 

61.4 

14.5 

51.5 

#S  -416232 

L 

75-29 

72.1 

62.5 

14.5 

50.2 

from  master 

lot  #S395607) 

Average 

71.5 

61.7 

14.5 

50.7 

LT 

75-16 

70.3 

60.4 

14.0 

44.4 

LT 

75-17 

70.4 

60.0 

14.0 

44.1 

LT 

75-18 

70.1 

59.8 

14.0 

44.9 

Average 

70.3 

60.1 

14.0 

44.5 

Alcoa  Expected  L 

65 

52 

Minimums* 

LT 

65 

52 

6 

7475-T761 

.125"  Thick 

L 

75-13 

73.8 

66.6 

15.0 

Sheet 

L 

75-14 

73.8 

66.8 

15.0 

(Alcoa  lot 

L 

75-29 

74.5 

67.4 

12.5** 

#102-145 

L 

75-30 

74.3 

66.5 

12.5** 

from  master 

lot  #681-036) 

Average 

74.1 

66.8 

13.8 

LT 

75-15 

74.5 

66.3 

13.0 

LT 

75-16 

74.6 

65.2 

12.0 

LT 

75-16A 

75.0 

66.1 

12.0 

Average 

74.7 

65.9 

12.3 

Alcoa  Expected  L 

70 

61 

Minimums* 

LT 

71 

60 

9 

Notes:  Test  specimen  configurations:  Plate  -  .505"  dia. 

sheet  -  flat  polished  to  .112"  or  .113"  thick.  Plate 
specimens  were  from  center  thickness. 

*  Alcoa  Green  Letter  Report  No.  216  (Rev.  10/71)  Ref  1 
**  The  -29  and  -30  specimens  were  from  one  end  of  a  48"  x 
144"  sheet  while  -13  and  -14  specimens  were  from  the 
other  end. 
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Table  XLIX 


TENSILE  PROPERTIES  OF 

TI-8MO-8V-2FE-3AL  TITANIUM  ALLOY  SHEET,  0.12"  THICK 
LONGITUDINAL  DIRECTION 

CONDITION  STA 


Specimen 

No. 

TYS 

ksi 

TUS 

ksi 

Elong. 

1  in  2" 

As  Rec'd 

25 

179.8 

193.7 

6.5 

26 

179.4 

192.9 

7.0 

27 

179.3 

192.9 

6.0 

AV. 

179.5 

193.2 

6.5 

Reaged  6  Hours  at  1050F 

28 

173.4 

184.2 

9.5 

29 

173.9 

185.1 

7.5 

30 

168.9 

183.1 

8.0 

AV. 

172.1 

184.1 

8.3 

Strain  Rate  =  .005  inch /inch /min. 
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Table  L 


TENSILE  PROPERTIES  OF 

TI-8MO-8V-2FE-3AL  TITANIUM  ALLOY  PLATE,  1"  THICK 


G  rain 
Direction 

Specimen 

No. 

TYS 

ksi 

TUS 

ksi 

Elong. 

7o  in  4D 

R.A. 

% 

Longitu 

dinal 

8-21 

169.1 

172.5 

2.5 

8.7 

-22 

168.7 

173.2 

2.5 

7.0 

-23 

169.5 

172.5 

2.5 

7.9 

-41 

173.1 

176.5 

3.27 

8.4 

-42 

173.6 

176.6 

2.86 

7.7 

-43 

166.6 

171.1 

3.16 

7.1 

-44 

167.6 

172.5 

3.54 

8.0 

AV. 

169.7 

173.6 

2.9 

7.8 

Long  T: 

ransverse 

8-13 

175.7 

182.1 

2.0 

6.4 

-14 

179.5 

184.0 

2.0 

5.5 

-15 

175.8 

180.3 

2.0 

5.3 

\ 

r 

AV. 

177.0 

182.1 

2.0 

5.7 

TMCA  Heat  V-4734 

Strain  Rate  .005  inch /inch /min. 

Reaged  for  6  hours  at  HOOF  at  General  Dynamics.  "Condition  STA" 
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Table  LI 


COMPRESSION  PROPERTIES  OF  7050-T76 
SHEET,  .06"  THICK 


Grain 

Test  Temp. 

Time  at 

Spec.  No. 

CYS 

X  R.T. 

Direction 

**F 

Temp..  Hr. 

KSI 

CYS 

LT 

RT 

50-268 

81.8 

1 

- 

50-265 

81.7 

I 

- 

50-267 

79.3 

AVG. 

80.9 

— 

L 

. 

50-259 

76.2 

I 

- 

50-260 

76.2 

- 

50-263 

75.9 

1 

AVG. 

76.1 

_ 

L 

270 

0.5 

50-240 

67.3 

I 

50-241 

68.2 

1 

50-242 

67.7 

f 

AVG. 

67.7 

89.0 

10 

50-201 

67.6 

1 

50-202 

68.4 

I 

50-203 

69.1 

▼ 

AVG. 

68.4 

89.9 

100 

50-208 

67.0 

1 

50-209 

68.7 

1 

50-210 

68.7, 

t 

AVG. 

68.1 

89.5 

L 

300 

0.5 

50-246 

66.1 

I 

50-247 

67.5 

1 

50-249 

67.6 

t 

AVG. 

67.1 

88.2 

10 

50-213 

67.2 

1 

50-214 

65.4 

I 

50-215 

65.0 

t 

AVG. 

65.9 

86.6 

100 

50-219 

54.2 

1 

50-220 

55.8 

1 

50-222 

55.9 

f 

AVG. 

55.3 

72.7 

L 

350 

0.5 

50-252 

61.5 

1 

50-253 

61.8 

I 

50-254 

63.6 

T 

AVG. 

62.3 

81.9 

10 

50-225 

48.2 

50-226 

48.8 

1 

50-227 

49.1 

f 

AVG. 

48.7 

64.0 

100 

50-231 

35.1 

1 

50-232 

34.3 

1 

50-233 

35.0 

T 

AVG. 

34.8 

45.7 

Alcoa  Lot  No.  109-216 
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Table  LIT 


COMPRESSION  PROPERTIES  OF  7050-T73651 
PLATE ,  3"  THICK* 


Exposure 

Time 

— 

Test 

Controls 

1/2  hour 

10  hour 

100  hour 

Temp. 

Grain 

Spec. 

CYS 

Spec. 

CYS 

Spec. 

CYS 

Spec . 

CYS 

°F 

Dir. 

No. 

KSI 

No. 

KSI 

No. 

KSI 

No. 

1  KSI 

RT 

LT 

68A 

70.2 

LT 

68B 

71.3 

LT 

69A 

72.2 

AVG 

71.2 

L 

70A 

67.9 

L 

70B 

67.5 

L 

71A 

67.7 

AVG 

67.7 

270°F 

L 

65A 

59.5 

64 

60.1 

63B 

58.3 

L 

72A 

59.7 

67B 

59.6 

66B 

56.9 

L 

74B 

59.5 

7  IB 

59.6 

76B 

58.2 

AVG 

59.6 

59.8 

57.8 

%  of 

RT 

88.0 

88.3 

85.4 

300°F 

L 

61A 

57.9 

67A 

50.4 

61B 

49.3 

L 

62A 

58.1 

75A 

51.4 

64B 

49.5 

L 

73A 

57.8 

80A 

51.1 

73B 

49.9 

AVG 

57.9 

51.0 

49.6 

%  of 

RT 

85.5 

75.3 

73.3 

350°F 

L 

62B 

51.8 

66A 

43.8 

63A 

32.5 

L 

65B 

51.9 

72B 

44.2 

74A 

32.7 

L 

76A 

52.0 

75B 

44.5 

80B 

33.8 

AVG 

51.9 

44.2 

33.0 

7»  of 

RT 

76.7 

65.3 

48.7 

*Testing  per  ASTM  E9  Specimens  1.0"  dia.  X  3.0"  long  from  plate  1/4 
thickness  level.  Specimens  were  from  a  3  x  60  (wide)  x  50  (long) 
inches  7050-T73651  plate  obtained  from  the  Grumman  Aerospace 
Corporation.  This  plate  was  originally  identified  by  Alcoa  as 
X7050-T7E64  and  was  from  Alcoa  lot  729-091. 
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Table  LIII 


FRACTURE  TOUGHNESS  PROPERTIES  OF  1\  INCHES  THICK 
2024-T851  ALUMINUM  ALLOY  PLATE 


Specimen 

Spec. 

Thickness 

KlCr_ 

Direction 

No. 

Inch 

ksi-lfin. 

L-T 

13 

1.0 

24.6 

1 

14 

1.0 

25.2 

T 

AV. 

24.9 

L-S 

15 

0.6 

26.0 

1 

16 

0.6 

26.2 

t 

AV. 

26.1 

Alcoa  lot  217-921 


CT  SPECIMENS 


SPECIMEN 

NO. 

P(Q) 

LB 

B 

INCH 

W 

INCH 

A 

INCH 

K(IC}_ 

psiVinch 

2024-13 

RW 

3550.0 

1.0000 

1.9865 

1.0037 

24573 

2024-14 

RW 

3640.0 

1.0005 

2.0048 

1.0176 

25245 

2024-15 

RT 

1650.0 

0.6015 

1.2003 

0.6300 

25956 

2024-16 

RT 

1700.0 

0.6020 

1.2002 

0.6226 

26211 
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Table  LIV 


FRACTURE  TOUGHNESS  PROPERTIES  OF  3.0  INCHES  THICK 
7050-T 73651  ALUMINUM  ALLOY  PLATE 


Specimen 

No.  * 

— 

Specimen 
Thickness 
(An.)  

! 

Loading-Crack 

Propagation 

Direction 

Kt  ** 

Ic 

(ksi-/irv) 

7050-52A 

1.0 

L-T 

28.2 

7050-52B 

1.0 

1 

26.1 

7050-60A 

1.0 

27.3 

f  AVG. 

27.2 

7050-53 

1.0 

S-L 

22.6 

7050-54 

1.0 

1 

23.5 

7050-55 

1.0 

1 

22.7 

▼  AVG. 

22.9 

*  Alcoa  lot  No.  729-091  on  3.0"  thick  x  60"  wide  plate. 
**  Compact  tension  specimens  tested  per  ASTM  E399-70T. 


CT  SPECIMENS 


SPECIMEN  NO. 

P(Q) 

LB 

B 

INCH 

W 

INCH 

A 

INCH 

K(IC) 

PSlVlNCH 

7050-52A  RW  RT 

4030.0 

1.0000 

1.9921 

1.0138 

28167 

7050 -52B  RW  RT 

3820.0 

1.0002 

2.0101 

1.0105 

26080 

7050 -60A  RW  RT 

3950.0 

0.9998 

2.0093 

1.0184 

27322 

7050-53  TR  RT 

3140.0 

1.0004 

1.9918 

1.0335 

22624 

7050-54  TR  RT 

3300.0 

1.0002 

1.9954 

1.0290 

23526 

7050-55  TR  RT 

3210.0 

0.9989 

1.9998 

1.0252 

22675 
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Table  LV 


FRACTURE  TOUGHNESS  PROPERTIES  1.5  INCHES  THICK 
7475-T7351  ALUMINUM  ALLOY  PLATE 


Specimen 

No. 

Specimen 

Thickness 

(in.) 

Loading-Crack 

Propagation 

Direction 

1 

KQ 

(ks  i-VUT. ) 

75-13 

1.5 

L 

-T 

63.0 

75-14 

1.5 

63.7 

75-15 

1.5 

65.3 

AVG. 

1 

' 

64.0 

NOTE  1.  These  three  specimens  and  their  tests  met  all 
the  validity  requirements  of  ASTM  E399-T71 
except  specimen  thickness.  This  specimen 
thickness  requirement  of  t  >  2.5  (Kic/YS)2 
would  require  thickness  to  be  2.6  to  2.8  inches 
using  yield  strength  from  Table  III.  The  speci¬ 
men  used  would  have  been  valid  for  the  expected 
Kic  of  47  KSI  -  VT^T. 


CT  SPECIMENS  -  L-T  DIRECTION 


P(Q) 

B 

SPECIMEN  NO. 

LB 

INCH 

75-13 

14960. 

1.4510 

75-14 

15200. 

1.4520 

75-15 

15520. 

1.4520 

W 

A 

K(IC) 

INCH 

INCH 

PS I y INCH 

3.0017 

1.5950 

62989 

3.0020 

1.5920 

63735 

3.0010 

1.5945 

65301 
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Table  LVI 


FRACTURE  TOUGHNESS  OF  1.0  INCH  THICK 
TI-8MO-8V-2FE-3AL  TITANIUM  ALLOY  PLATE 


Specimen 

No. 

Specimen 

Thickness 

Inch 

Loading-Crack 

Propagation 

Direction 

Kl£_ 

KsruiT. 

8-26 

1. 

,0 

L 

-T 

53.1 

8-29 

53.9 

8-30 

55.0 

AV. 

1 

' 

54.0 

8-31 

1. 

,0 

T 

-L 

53.2 

8-32 

55.0 

8-33 

53.4 

AV. 

r 

53.9 

CT  SPECIMENS 


SPECIMEN  NO. 

P(Q) 

LB 

B 

INCH 

W 

INCH 

A 

INCH 

K(IO 

PSiyiNCH 

8-26 

LT 

7830.0 

1.0020 

1.9900 

0.9940 

53118 

8-29 

LT 

8000.0 

1.0050 

1.9950 

0.9950 

53921 

8-30 

LT 

7985.0 

0.9980 

1.9890 

1.0010 

55017 

8-31 

TL 

7580.0 

0.9960 

1.9930 

1.0140 

53158 

8-32 

TL 

7945.0 

0.9980 

1.9950 

1.0080 

54989 

8-33 

TL 

7870.0 

0.9910 

1.9910 

0.9870 

53369 
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Table  LVII 

STRESS  CORROSION  PROPERTIES  OF 
7050-T73651  ALUMINUM  ALLOY  PLATE,  3”  THICK 


Specimen  No. 

Kli 

ksi^n. 

Time  to  Failure 
Hours 

Ku/Kic 

Residual 

K* 

ksi-“\|in. 

50-56 

19.2 

1073  NF 

.84 

22.6 

50-57 

20.1 

1227  NF 

.88 

22.4 

50-58* 

22.3 

1033  NF 

.97 

|i 

24.4 

50-594= 

23.8 

FOL 

1.00 

- 

Klscc*KIft 

Testing  direction,  S-L 

Stagnant  3.5%  NaCl  replaced  weekly 

♦Flowing  corrodent,  quart /hour 

^Progressively  step  loaded  as  shown  in  Figure  94 

NR-N©  Failure 

FOL- Failed  on  Loading 


CT  SPECIMENS 


SPECIMEN  NO. 

P(Q) 

LB 

B 

INCH 

w 

INCH 

A 

INCH 

PS ..  VlNCH 

7050-56 

3.5 

NACL 

2600.0 

1.0010 

2.0000 

1.0538 

19164 

7050-56 

STATIC 

3060.0 

1.0010 

2.0000 

1.0538 

22554 

7050-57 

3.5 

NACL 

2880.0 

1.0005 

2.0030 

1.0202 

20090 

7050-57 

STATIC 

3000.0 

1.0005 

2.0030 

1.0632 

22385 

7050-58 

3.5 

NACL  FLOWING 

2880.0 

1.0018 

2.0050 

1.0871 

22268 

7050-58 

STATIC 

3150.0 

1.0018 

2.0050 

1.0871 

24356 

7050-59 

3.5 

NACL  STAGNANT 

3300.0 

1.0003 

2.0004 

1.0403 

23815 
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Table  LVIII 


STRESS  CORROSION  PROPERTIES 
OF  Ti-8Mo-8V-2Fe-3Al  STA,  1"  THICK  PLATE 


Test  Direction 

Spec.  No. 

KlV- 

ksi-uIrT. 

Time  to 
Failure.  Hr. 

Kli/Klc 

L-T 

8-27 

27.0 

0.08 

0.50 

I 

8-25 

23.3* 

0.07 

0.43 

1 

8-28 

23.7* 

0.7 

0.44 

t 

Av •  KjgCC  *23.5 

0.43 

T-L 

8-34 

42.6 

0.05 

0.79 

| 

8-37 

21.7* 

0.06 

0.40 

8-35 

23.9* 

0.08 

0.44 

1 

8-26 

24.3* 

0.04 

0.45 

▼ 

Av •  Kjg££  “23.3 

Precracked  compact  tension  specimens  tested  in  3.57.  NaCl. 
♦Progressively  step  loaded  to  failure  (see  Figure  95) 


CT  SPECIMENS 


SPECIMEN  NO. 

P(Q) 

LB 

B 

INCH 

W 

INCH 

A 

INCH 

K(in 
PSI  yiNCH 

8-27 

LT 

3.5 

NACL 

4000.0 

1.0050 

1.9880 

0.9920 

270?3 

8-34 

TL 

3.5 

NACL 

6400.0 

1.0000 

1.9940 

0.9830 

42631 

8-37 

TL 

3.5 

NACL 

3200.0 

0.9980 

1.9890 

0.9910 

21720 

8-25 

LT 

3.5 

NACL 

3400.0 

0.9980 

1.9810 

0.9920 

23298 

8-35 

TL 

3.5 

NACL 

3500.0 

0.9990 

1.9880 

0.9960 

23934 

8-28 

LT 

3.5 

NACL 

3500.0 

1.0020 

1.9870 

0.9900 

23673 

8-36 

TL 

3.5 

NACL 

3500.0 

0.9830 

1.9870 

0.9960 

24349 
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Table  LIX 


NOTCHED  AXIAL  FATIGUE  PROPERTIES  OF 
7050-T76  SHEET,  0.06"  THICK 
LONGITUDINAL  GRAIN,  R-0.1,  Kj-3  OR  5 


Specimen  No. 

Maximum  Fatigue 
Stress,  ksi 

Cycles  to 
Failure.  xlO^ 

Remarks 

Kt=3 

50-100 

40 

2.85 

-101 

40 

2.70 

-99 

20 

37 

-102 

r 

44 

-104 

36 

-105 

1 

32 

-106 

15 

115 

-10  7 

15 

117 

-103 

14 

1348 

-109 

13 

1723 

-110 

13 

8126 

-108 

10 

10189 

NF  (Fntu=90.8  ksi)* 

Kt-5 

50-3 

40 

1.8 

-4 

40 

2.1 

-1 

20 

20 

-7 

20 

23 

-5 

15 

56 

-9 

15 

50 

-10 

13 

116 

-8 

10 

10089 

NF  (Fntu=&7.2  ksi)* 

-11 

1 

614 

-12 

? 

189 

-2 

8 

10037 

NF  (Fntu=87.6  ksi)* 

-6 

8 

15080 

NF  (Fntu=87.7  ksi)* 

Alcoa  Lot  109-216 

Fntu=  Notched  tensile  strength  after  each  specimen  had  been  removed 
from  fatigue  testing. 
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Table  LX 


NOTCHED  AXIAL  FATIGUE  PROPERTIES  OF 
7050-T73651  ALUMINUM  ALLOY  PLATE, 

3"  THICK,  LONGITUDINAL  GRAIN,  k  THICKNESS  LOCATION 


Specimen  No. 

Maximum  Fatigue 
Stress,  ksi 

Cycles  to 
Failure.  X  1000 

Remarks 

Kt“  3 

50-1B 

40 

3.3 

-2B 

40 

3.3 

-3B 

40 

2.6 

-5B 

20 

82 

-6B 

20 

96 

-LA 

20 

84 

-2A 

20 

105 

-4B 

18.5 

906 

-5A 

18.5 

12330 

NF  (Fntu=79-8  ksi> 

-4A 

17 

4323 

NF 

-6A 

17 

10386 

NF  (Fntu*79-1  ksi> 

-3A 

15 

10045 

NF  (Fnn,-79.8  ksi) 

Kt=  5 

50- 7A 

40 

2.25 

-8A 

40 

2.15 

-11A 

20 

38 

-12A 

20 

82 

-7B 

20 

52 

-8B 

20 

122 

-9B 

15 

266 

-11B 

15 

147 

-10B 

13 

389 

-12B 

13 

948 

-9A 

12 

10197 

NF  (Fntu=75.3  ksi) 

-10A 

10 

10192 

NF  (Fntu=76 .2  ksi) 
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Table  LX1 


NOTCHED  AXIAL  FATIGUE  PROPERTIES  OF 
7475-T761  SHEET?.  125"  THICK 
LONGITUDINAL  GRAIN,  R=0.1,  Kt=3  OR  5 


SPECIMEN 

MAXIMUM 

FATIGUE 

CYCLES  TO  3 

REMARKS 

NO. 

STRESS.  KSI 

FAILURES .  X  ID 

Kt=  3 

75-1 

4 

3 

5 

-2 

4 

-3 

1 

4 

-4 

40 

4 

-5 

20 

63 

-6 

446 

-7 

' 

1 

159 

-8 

20 

89 

-9 

17 

2195 

Grip  Failure 

-10 

285 

-11 

10344 

NF  (Fntu=80.3  ksi)+ 

-12 

17 

14701 

NF  (Fn.,,-80.2  ksi)* 

Kt-  5 

C  -17 

20 

51 

-18 

33 

-19 

\ 

r 

86 

-21 

15 

461 

-22 

194 

-23 

129 

-25 

> 

259 

-26 

12 

226 

-27 

1 

4248 

-28 

\ 

r 

4287 

-24 

10 

15505 

NF  (Fntu=78*3  ksi)^ 

-20 

10 

10120 

NF  (FnM,=77.8  ksi)£ 

*Specimens  were  from  0.125  X  48  X  144  inches  sheet  of  7475-T61 
from  Alcoa  Lot  102-145  artificially  aged  at  Convair  to  the  -T761 
temper . 

£Fntu  =  Notched  tensile  ultimate  strength  after  each  specimen  had 
been  removed  from  fatigue  testing. 
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Table  LX1I 


NOTCHED  AXIAL  FATIGUE  PROPERTIES  OF 
7475-T7351, 1.5"  THICK  PLATE,  LONGITUDINAL 
GRAIN,  R-O.l,  Kt-3  OR  5,  \  THICKNESS  LOCATION 


Specimen  No. 

Max.  Fatigue 
Stress,  ksi 

Cycles  to 
Failure,  X1000 

Remarks 

Kt=3 

75-7B 

-8B 

-10B 

-11B 

-12B 

-7A 

-8A 

-9B 

-11A 

-12A 

-9A 

-10A 

4 

2 

I 

1 

1 

1 

1 

h0 

0 

t 

.7 

[ 

5 

5 

4 

4 

4.7 

60 

90 

55 

76 

102 

173 

188 

12635 

10018 

NF  (Fntu“60 . 5  ksi)  t 
NF  *  (Fntu=75.9  ksi)* 

Kt=5 

75-5A 

40 

3.6 

-IB 

I 

I 

3.1 

-4B 

1 

\ 

3.6 

1 

-1A 

15 

338 

i 

-2A 

3304 

-3A 

1 

1 

426 

-4A 

f 

2563 

-3B 

13 

10429 

NF  *  (Fntu“70 . 1  ksi) i 

-5B 

853 

-6B 

i 

r 

829 

-2B 

12 

10186 

NF  *  <Fntu=7^-8  ksi)* 

-6A 

10 

10279 

NF  (Fntu=73.4  ksi)* 

*Very  small  (.002"  deep)  fatigue  crack  in  one  radius 
^  These  notched  tensile  ultimate  values  were  obtained  after  the 
specimen  had  been  fatigue  cycled  as  noted  to  the  left. 
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Table  LXIII 


NOTCHED  AXIAL  FATIGUE  PROPERTIES  OF 
Ti-8Mo-8V-2Fe-3Al  SHEET, 0.12  "  THICK 
R=0 . 1 ,  LONGITUDINAL  GRAIN,  Kt=3  OR  5 


■  - - J 

Specimen 

No. 

Maximum  Fatigue 
Stress,  ksi 

Cycles  to 
Failure.  X  10 3 

Remarks 

Kt=3 

8-7* 

80 

1.8 

Rerun 

-5* 

80 

2.94 

-1 

50 

12 

-2 

11 

-4* 

10 

_9* 

13 

-10* 

30 

56 

-11* 

1 

26 

-12 

\ 

36 

-5* 

25 

2516 

NF 

-6* 

25 

20816 

NF  (Fntu=194.5  ksi) 

-3 

20 

10353 

NF 

-8 

15 

4294 

NF  (Fntu=189.5  ksi) 

Kt=5 

8-22* 

70 

2.07 

-16* 

50 

7 

-18* 

7 

-19* 

! 

1 

8 

-13* 

30 

37 

-14* 

20 

79 

-17* 

I 

80 

-20* 

1 

85 

-21* 

17 

126 

-24* 

17 

26649 

NF  (Fntu=157.;  ksi) 

-15* 

15 

10008 

NF  (Fntu=145.6  ksi) 

-23* 

15 

15566 

NF  (Fntvrl45.4  ksi) 

*  Reaged  6  hours  at  1050F.  Condition  STA 
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Table  LXIV 

NOTCHED  AXIAL  FATIGUE  PROPERTIES  OF 
TI-8MO-8V-2FE-3AL  PLATE,  1"  THICK 
STA  CONDITION,  LONGITUDINAL  GRAIN 
R  -  0.1,  Kj  -  3  OR  2 


Specimen  No. 

Maximum  Fatigue 

Cycles  to 

Remarks 

Stress,  KSI 

Failure,  X103 

Kt=3 

8-iOB 

80 

2.62 

f=6  Hz 

-11B 

80 

2.25 

II 

-8B 

50 

19.48 

It 

-9A 

50 

15.09 

II 

-1IA 

50 

13.60 

II 

-  9B 

35 

64 

-12A 

35 

55 

-  7A 

33 

112 

-10A 

33 

63 

-  7B 

30 

7749 

-  8A 

30 

10348 

NF  (Fntu  =  154.9  KSI) 

-12B 

32 

99 

Kt=2 

8-5A 

100 

4.14 

f=6  Hz 

-5B 

100 

3.41 

II 

-3B 

80 

9 

-6A 

80 

8 

-IB 

60 

333 

f-6  Hz 

-3A 

60 

220 

M 

-4A 

60 

60 

-1A 

57 

- 

Failed  in  hole 

-4B 

57 

360 

-6B 

57 

486 

-2B 

55 

10704 

NF  <Fntu  “  136.0  KSI) 

-2A 

50 

1050 

*NF  (Fntu  =  V  7-7  KSI) 

1 

f  =  6  Hz 

*  Fatigue  crack  at  notch  invalidates  Fntu. 
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Table  LXV 


AV.  NOTCH  TENSILE  STRENGTH  OF  ALLOYS 


Alloy 

Form 

K*-  1 

-  3 

 Kt 

-  5 

NTUS 

ksi 

NTUS 

TUS 

NTUS 

ksi 

NTUS 

TUS 

7050-T76 

.060" 

Sheet 

90.8 

1.06 

87.5 

1.02 

7050-T73651 

3" 

Plate 

79.6 

1.02 

75.7 

0.97 

7475-T761 

.125" 

Sheet 

80.2 

1.08 

78.0 

1.05 

7475-T7351 

IV 

Plate 

- 

- 

73 

1.02 

Ti-8-8-2-3  STA 

.125" 

Sheet 

192.0 

1.04 

149.6 

0.81 

Ti-8-8-2-3  STA 

1" 

Plate 

155 

0.89 

186* 

1.07 

Values  obtained  from  unfailed  fatigue  specimens  tested  below 
endurance  limit. 
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Table  LXVI 

SURFACE  FLAW  SPECIMEN  50-44 
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At  failure  2C^V  «  2.288  Inch 
2CMAX  **  2.422  Inch 
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24.0  0.4150  0.9220  1.0  9.33  8.86  2.000  2.000  0.815  0.83  0.186  0.450 
26.0  0.4340  0.9670  5.0  10.36  9.81  3.800  4.500  1.814  0.86  0.195  0.449 
26.0  0.4540  1.0160  5.0  10.61  10.03  4.000  4.900  1.964  0.90  0.205  0.447 
28.0  0.4930  1.1370  2.5  12.07  11.24  5.200  11.800  4.543  0.98  0.229  0.434 
28.0  0.5030  1.1800  2.0  12.29  11.35  5.000  10.750  4.102  1.00  0.237  0.426 
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Figure  69  Tensile  and  Compression  Test  Specimens 
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Specimen  Type 
&  Material 

Dimensions  in  Inches 

B 

2H 

W1 

W 

aN 

KIC  &  KISCC 
Titanium  and 
7050  Plate 

1.00 

2.40 

2.50 

2.00 

1.25 

KIC 

7475-T7351 

Plate 

1.50 

3.60 

3.75 

3.00 

1.35 

Figure  70  Compact  Tension  Specimen  Configuration 


60°  V  Notch,  Radius  R 
.625  Dia 
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d 

(+.005) 
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kt 

1.000 

.700 

.050 
+  .003 

3.0 

1.000 

.700 

.015 
+  .001 

5.0 

1.000 

.680 

.145  ±.005|  2.0 

PLATE  X 


SHEET  C 


t  =0.063  for  7050  Al 
=  0.125  for  7475  Al  &  Ti 


Tt 


Figure  71  Fatigue  Test  Specimen  Configuration 
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Figure  74  Specimen  Locations  in  7050 -T76  Sheet 

.060"  Thick 
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Figure  75  Detail  Layout  of  Specimen  Blanks  in  7050-T73651 

3"  Thick  Plate 
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Figure  76  Specimen  Location  in  7050-T73651  Plate 
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Figure  77  Specimen  Location  in  7050-T73651  Plate 
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Figure  78  Specimen  Location  in  7475-T761  Sheet,  1'/ 8"' Thick 
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Figt’re  79  Specimen  Location  in  7475-T7351  1%  Inch  Plate 
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Figure  80  Specimen  Layout  for  Ti-8Mo-8V-2Fe-3Al  .125"  Thick  Sheet 
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Figure  81  Specimen  Layout  for  Ti-8Mo-8V-2Fe-3Al  1"  Thick  Plate 
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Figure  82  Specimen  Location  in  2024-T851  (Alcoa  Lot  217-921) 

FMS1010  Class  A,  1%"  Thick 
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Figure  83  Effect  of  Elevated  Temperature  on 
the  Tensile  Ultimate  Strength  of 
7050-T76  Sheet.  Test  at  Temperature 
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cent  of  Room  Temperature 


Figure  84  Effect  of  Elevated  Temperature 
on  the  Tensile  Yield  Strength 
of  7050-T76  Sheet.  Test  at 
Temperature 
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Per  cent  of  Room  Temperature  Ftu 


Figure  85  Effect  of  Elevated  Temperature  on 

the  Tensile  Ultimate  Strength  at 
Room  Temperature  After  Elevated 

Temperature  Exposure  of  7050-T76 
Sheet 
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Per  cent  of  Room  Temperature 


7050-T76  Sheet 
.063  In.  Thick 


Figure  86  Effect  of  Elevated  Temperature 
on  the  Tensile  Yield  Strength 

at  Room  Temperature  after 
Elevated  Temperature  Exposure 
of  7050-T76  Sheet 
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Figure  87  Effect  of  Elevated  Temperature  on 
the  Tensile  Ultimate  Strength  of 
7050-T73651  Plate  at  Temperature 
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cent  of  Room  Temperature 


Figure  88  Effect  of  Elevated  Temperature 
on  the  Tensile  Yield  Strength 
of  7050-T73651  Plate  at 
Temperature 
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Per  cent  of  Room  Temperature 


Figure  89  Effect  of  Elevated  Temperature 

on  the  Tensile  Ultimate  Strength 
at  Room  Temperature  after 
Elevated  Temperature  Exposure 
of  7050-T73651  Plate 
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Per  cent  of  Room  Temperature 


— 7075-T6  MIL-HDBK-5B 

_ 7050-T73651  Convair  Tests  on 

3  Inches  Thick  Plate 


Figure  90  Effect  of  Elevated  Temperature 
on  the  Tensile  Yield  Strength 
at  Room  Temperature  after 
Elevated  Temperature  Exposure 
of  7050-T73651  Plate 
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Per  cent  of  Room  Temperature 


Figure  92  Effect  of  Elevated  Temperature 
on  the  Compression  Yield 
Strength  of  7050-T73651  Plate 
at  Temperature 
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Figure  93  Typical  Failed  Fracture  Toughness  Specimens 
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Figure  95  Stress  Corrosion  Tests  on  Ti-8Mo-8V-2Fe-3Al  STA,  1"  Thick  Plate 
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Cycles 

Figure  96  Comparison  of  Notched  Axial 

Fatigue  Properties  of  Aluminum 
Alloys,  R  =  0.1,  K,.  -3 
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Cycles 

Figure  97  Comparison  of  Notched  Axial 

Fatigue  Properties  of  Aluminum 
Alloys ,  R  =  0. 1,  K  =5 
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Figure  99  Axial  Notched  Fatigue 
Strength  of  3  Inch 
Thick  7u50-773651  Alum¬ 
inum  Alloy  Plate 
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Figure  100  Axial  Notched  Fatigue  Strength  of  0.125  inch 
Thick  7475-T761  Aluminum  Alloy  Sheet 
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pecimens  From  1.5  Inch  Thick 
’475-T7351  Aluminum  Alloy  Plate 
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Figure  105  Comparison  of  Notched  Fatigue  Strength  of  Titanium  Alloys, 


Crack  Growth,  Inch/Cycle 


Figure  106  Surface  Flaw  Specimen 
7050-T73651  50-44 
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Crack  Growth,  Inch/Cycle 


Delta  K,  ksi-  \^nch 


Figure  107  Surface  Flaw  Specimen 
7050-T73651,  #50-49 
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Crack  Growth,  Inch/Cycle 


Figure  108  Surface  Flaw  Specimen 
7050-T73651,  50-45 
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Crack  Growth,  Inch/Cycle 


Ftgure  109  Surface  Flaw  Specimen 
7050-T73651,  50-50 
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Crack  Growth,  Inch/Cycle 


Figure  110  Center  Crack  Tension  Specimen  7050-T73651  #50-50 
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CRACK  PROPAGATION  RATE,  jZj  ,  I0-6  inches/cycl 


STRESS  INTENSITY  RANGE,  AK,  ksi/T^h 


Figure  111  Surface  Flaw  Specimen  7050-T73651  50-51 
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CRACK  PROPAGATION  RATE,  gTj  ,  inches/cycle 


Figure  112  Center  Crack  Tension  Specimen  7050-T73651  #50-51 
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Crack  Growth,  Inch/Cycle 


Figure  113  Surface  Flaw  Specimen  7475-T7351,  #75-23 
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CRACK  PROPAGATION  RATE,  j7j  ,  inches/cycle 
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Figure  114  Surface  Flaw  Specimen  7475-T7351,  #75-21 
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Crack  Growth,  Inch/Cycle 


Figure  115  Surface  Flaw  Specimen  7475-T7351,  #75-19 
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Crack  Growth,  Inch/Cycle 
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*dc/dn  vs.  surface 
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Figure  116  Surface  Flaw  Specimen  7475-T7351,  #75-20 
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CRACK  PROPAGATION  RATE,  jjq  ,  1(T6  inches/cycl 


Figure  117  Surface  Flaw  Specimen  7475-T7351,  #75-25 
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Crack  Growth,  Inch/Cycle 
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Crack  Growth,  Inch/Cycle 
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Crack  Growth, Inch/Cycle 
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Crack  Growth,  Inch/Cycle 


Figure  121  Center  Crack  Tension  Specimen  TI-8MO-8V-2FE-3AL  8  '9 
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Crack  Growth,  Inch/Cycle 
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Crack  Growth,  Inch/Cycle 
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Crack  Growth,  Inch/Cycle 


Figure  124  Center  Crack  Tension  Specimen 
TI-8MO-8V-2FE-3AL  8-19 


328 


Crack  Growth,  Inch/Cycle 


Figure  125  Center  Crack  Tension  Specimen  TI-8M0-8V-2FE-3AL 


8-39 
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Crack  Propagation  Rate,  da/dM,  Inch/Cycle 
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Crack  Propagation  Lata,  da/<* 


Delta  L,  kai- Vlnch 
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Crack  Propagation  kata,  da/dH,  Inch/Cycla 


Crack  Propagation  Rate,da/dN,  Inch/Cycl 
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Figure  129  Comparison  of  Fatigue  Crack  Growth  Rates  of  7050-T73651 
7475-T7351  and  Ti-8-8-2-3  STA  Plates,  R  -  0.3 
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Spec.  No.  50-44 
Dry  Air 
360  CFM 
L-S  Direction 

(Premature  failure 
from  back  side  crack.) 


Spec.  No.  50-49 
Dry  Air 
360  CPM 
T-S  Direction 

(Premature  failure 
from  side  crack.) 


Spec.  No.  50-45 

3.57.  NaCl  60  CFM 
L-S  Direction 


Spec.  No.  50-50 

3.57.  NaCl  60  CFM 
T-S  Direction 


Spec.  No.  50-51 

3.57.  NaCl  6  CPM 
T-S  Direction 


Figure  130  Fracture  Surfaces  of  7050-T73651  da/dN  Surface  Flaw  Specimens 
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Spec.  No.  75-23 
Dry  Air 
360  CPM 
L-S  Direction 


Spec.  No.  75-21 
Dry  Air 
360  CPM 
T-S  Direction 


Spec.  No.  75-19 
3.57.  NaCl 
60  CPM 

T-S  Direction 


Spec.  No.  75-20 
3.57.  NaCl 
60  CPM 

T-S  Direction 


Spec.  No.  75-25 
3.57.  NaCl 
6  CPM 

L-S  Direction 


Figure  131  Fracture  Surfaces  of  7475-T7351  da/dN  Surface  Flaw  Specimens 
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Spec.  No.  8-17 
Dry  Air 
360  CPM 
L-S  Direction 


Spec.  No.  8-39 
Dry  Air 
360  CPM 
T-S  Direction 


Spec.  No.  8-19 
3.5%  NaCl  60  CPM 
L-S  Direction 


Figure  132  Fracture  Surfaces  of  Ti-8Mo-8V-2Fe-3Al  da/dN  Surface 
Flaw  Specimens 
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^~max  ~  25.2  ksi 
2Cq  =  .310,  aD  =  .190 
Failed  in  Block  59 

7475-T7351 
Spec.  #75-24 


(Tinav  —  25.2  ksi 
2C0  =  .308,  aD  =  .213 
Failed  in  Block  48 

7475-T7351 
Spec.  #75-26 

Omax  =  25*2  ksi 
2C0  -  .300,  3q  =  .188 
Failed  in  Block  84 

7050-T73651 
Spec.  #50-48 


(Jmax  =  68  ksi 
2Cc  =  .400,  aG  =  .162 
Failed  in  Block  2 

Ti-8-8-2-3  STA 
Spec.  #8-16 


Omax  "  68  ksi 
2C0  =  .328,  aD  =  .255 
Failed  in  Block  4 

Ti-8-8-2-3  STA 
Spec.  #8-18 


Figure  133  Fracture  Surfaces  of  Spectrum  Fatigue 
da/ dN  Surface  F  aw  Specimens 
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11.  abstract 


This  report  describes  the  preliminary  design  and  analysis  for  an  Advanced  Air 
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ing  costs.  The  subsequent  program  involves  additional  preliminary  design,  a  develop 
ment  test  program,  detail  design,  manufacture,  and  tests;  including  static,  fatigue, 
and  damage  tolerance  testing.  Information  generated  during  this  effort  will  be  dis¬ 
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transfer  effort. 
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